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Editorial 
esta edição abordaremos alguns as- 
pectos da compatibilidade, um tema 
essencial, principalmente aqui em nosso 
mercado aonde imperam as dificuldades de 
comunicação. 

A compatibilidade, à primeira vista, só 
traz benefícios: permite O intercâmbio de 
software e hardware periférico; a interliga- 
ção de máquinas em rede e, especialmente, o 
aproveitamento do trabalho e investimento 
já dispendidos na hora em que se quer trocar 
ou utilizar temporariamente outro equipa- 
mento. É o caso, por exemplo, da utilização 
de arquivos de um software em máquinas de 
diferentes linhas. Sobre este assunto, dê uma 
olhada na solução encontrada por nossos co- 
laboradores José Carlos Niza e Ronaldo Gis- 
mondi para transferir arquivos do Visicale 
entre equipamentos compatíveis com Apple 
e TRS80. 

Da mesma forma, compatibilizar lingua- 
gens seria um importante passo no sentido 
de popularizar a operação dessas máquinas: 
já imaginou não só poder usar uma enorme 
biblioteca de programas como também saber 
programar com igual desenvoltura qualquer 
micro que lhe caísse às mãos? Bem, enquan- 
to nossa realidade não é a do padrão e sim 
da proliferação de dialetos, os usuários vão 
se virando como podem: Maria Sylvia 
Abaurre, por exemplo, encontrou na tradu- 
ção um meio razoável de utilizar, em seu 
Commodore, programas para outras linhas 
de equipamentos. 

Mas é na hora de adaptar as máquinas ao 
mercado brasileiro sem, contudo, descarac- 
terizá-las em suas compatibilidades iniciais 
que a coisa se complica. Veja a maratona 
que é, e o troca-troca de EPROMSs que en- 
volve, a “operação” de dotar um micro — 
Apple ou TRS — de condições para falar um 
português decente na matéria “Acentuação 
nos micros nacionais”. 

Se formos parar para refletir mais seria- 
mente sobre esta situação, veremos que esta- 
mos nos perdendo em detalhes verdadeira- 
mente absurdos, como fazer com que um 
TK-85 possa utilizar um periférico do 
CP-200, ou que um Apple-like possa usar 
uma placa de outro Apple-like. O que deveria 
ser natural torna-se, por vezes, excepcional- 
mente difícil. Triste quadro; enquanto nos 
EUA discute-se os méritos exatos da compa- 
tibilidade (existe uma corrente de analistas 
que alega que a padronização dela decorren- 
te inibe a exploração real das potencialida- 
des específices de cada máquina), aqui no 
Brasil ainda tratamos de compatibilizar os 
compatíveis entre si e, o que é pior, com 
seus compatíveis originais. 
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cartas 


O sorteado deste mês, que receberá uma 
assinatura anual da revista MICRO 
SISTEMAS, é Fernando Brasil Sales, de 
Fortaleza — Ceará. 


SUGESTÕES 


Sou usuário de um CP-300 e fã nº 1 de 
MICRO SISTEMAS. Sugiro que publiquem 
mais jogos e utilitários (como o Copsys e o 
ótimo Quasar). Gostaria ainda que publicas- 
sem um mapa da ROM, a exemplo dos já 
publicados para outras linhas de equipamen- 
tos. 

Fernando Brasil Sales 
Fortaleza - CE 


/ APPLE CLUB / 


Tem esta a finalidade de parabenizá-los 
pela matéria publicada em MS nº 43, com 
o título de “Vá procurar sua turma em um 
clube de micros”, que proporcionou aos 
usuários saber da existência destes clubes. 

Queremos ainda informar aos leitores, 
que devido a má utilização, por parte de 
alguns sócios, dos programas por nós em- 
prestados em perfeitas condições de uso e 
que, na ocasição da devolução, constata- 
mos estarem danificados, decidimos, a par- 
tir do mês de maio/85, não mais trabalhar 
com empréstimos, mudando desta maneira, 
a cobrança de taxa de Cadastro de Sócio e 
os valores logicamente devidos pela aquisi- 
ção de programas. 

Valmir Garbin 
Diretor/Apple Magic Club 


TK 85 COM EPSON 


Sou possuidor de um TK-85 e recente- 
mente adquiri uma interface de impressora 
paralela fabricada pela Microdigital. 

Como utilizo uma impressora EPSON 
cujos caracteres e instruções se baseiam no 
código ASCII, gostaria de saber se a interface 
permite o acesso aos caracteres de nº ASCII 
128 a 255, pois há necessidade deles para 
utilizar o potencial gráfico da impressora 
assim como algumas instruções de tabula- 
ção. O folheto que acompanha a interface é 
omisso a esse respeito, Em caso negativo, é 
possível fazer alguma adaptação? 

Luiz Mamede G, Magalhães 
Rio de Janeiro - RJ 





De acordo com nosso procedimento ha- 
bitual, remetemos sua pergunta à Micro- 
digital: 

“Para utilização de uma impressora no 
equipamento TK-85 é necessário a utiliza- 
ção de uma interface para impressora, tendo 
as seguintes especificações: Paralela; Padrão 
Centronics. 

Esta interface permite acesso aos carac- 
teres ASCI! de O a 127, sendo estes repre- 
sentados na impressora. Os caracteres 128 a 
255 são caracteres gráficos do equipamento 
TK-85, portanto estes caracteres são pró- 
prios da ROM do computador. Sendo estes 
não reconhecidos pela impressora devido ao 


seu sistema, que entende estes (caracteres 
gráficos) como caracteres de controle. Ou 
seja, os caracteres ASCI! de 128 a 255 não 
são codificados pela impressora, portanto 
não é possível fazer a adaptação para estes 
caracteres devido às razões acima citadas.” 
Ricardo Tondowski 

Assessor da Diretoria da Microdigital 


AUTCAT/BAS 


Através da reclamação de um leitor pau- 
lista, verifiquei que o programa AUTCAT/ 
BAS (MS nº 38, p. 69), apresentava proble- 
mas quando da execução de certos progra- 
mas. Exemplificando, citou o SARGON/ 
CMD que apresentava um cursor piscante 
na tela, O que não é próprio desse jogo. 

Identifiquei esse problema, como sendo 
um resíduo do comando CMD"D:O”. E, 
para solucionar, criei uma nova linha que de- 
verá ser inserida no programa AUTCAT/ 
BAS: 

1370 DEFUSR = 105: X = USR (0) 

Esta linha chama a rotina $INITIO, 
no endereço decimal 105 da ROM, para re- 
tornar todas as entradas/saídas às suas con- 
dições iniciais, o que faz desaparecer o pro- 
blema, 

Ari Morato 
Ipatinga - MG 


/ SPEAK & SPELL / 


Gostaria de me comunicar com alguém 
que conheça bem o aparelho Speak & 
Spell, fabricado pela Texas Instruments. 
Meu endereço é: Rua Maria Custódia, 38 
— CEP 02460 — São Paulo — SP. 

Sérgio Augusto da Costa 
São Paulo - SP 


/ GEOGRAFIA NO MICRO ; 


Como professor, adquiri recentemente 
um TK 85, e de forma primária, tenho feito 
programas na área de Geografia, a qual 
leciono, 

Gostaria de contar com apoio dos cole- 
gas que já elaboraram programas nesse setor, 
e se possível trocar idéias com o fim de aper- 
feiçoamento, Meu endereço é: Rua C nº 11 
— Jardim Marialda — CEP 06730, 

Avelino de Oliveira 
Vargem Grande Paulista - SP 


TECLADOS SPEED 


Gostaria de parabenizar a firma Speed 
Eletro Eletrônica de Contagem - MG, pelo 
excelente produto por eles fabricado (tecla- 
do para linha Sinclair). (...) Adquiri um que 
funciona com perfeição, porém a Speed po- 
deria melhorar o manual de instalação, que 
não condiz com o excelente material pro- 
duzido pela firma, 

Henrique O. E. Ammirabile 
Brasília - DF 














Envie suas correspondências para: ATI — 
Análise, Teleprocessamento e Informática 


Editora Ltda. Av. Presidente Wilson, 
165/gr. 1210, Centro, Rio de Janeiro/RJ, 
CEP 20030, Seção Cartas/Redação 

MICRO SISTEMAS. 
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XT 2002 


O CENTRO DAS ATENÇÕES EM 
TODOS OS AMBIENTES 


PARA AMBIENTES MULTIFUNCIONAIS QUE DEPENDAM DE MAIOR NÚMERO DE SLOTS LIVRES E 
PARA USUÁRIOS COM MAIOR NECESSIDADE DE CAPACIDADE DE ARMAZENAMENTO O XT2002 
DA MICROTEC E A SOLUÇÃO EM TERMOS DE “PC-COMPATÍVEL. SEUS OITO SLOTS E O 
ARMAZENAMENTO DE 10 OU 20 MBYTES NOS DISCOS WINCHESTER EMBUTIDOS, FAZEM DO 
XTe002 A BASE PARA SEUS PROJETOS PRESENTES E FUTUROS. TESTADO E APROVADO POR 
INUMERAS EMPRESAS, O XT2002 ESTA DISPONÍVEL NA COMPUMICRO PARA PRONTA ENTREGA, 
COM OS MELHORES PREÇOS DO MERCADO E ASSISTÊNCIA TECNICA EM TODO O PAÍS. NA 
COMPUMICRO, ALÉM DO HARDWARE, VOCÊ ENCONTRA TODA A LINHA DE SOFTWARE DA 
MICROSOFT, ASTHONJTATE, MICROPRO E O OPEN-ACESS DA SPA. 


OUTROS PRODUTOS DE NOSSA LINHA [VENDA OU ALUGUEL] 


PC 2001 EXP MEMÓRIA (0 — 512K] MONICA/MONICA PLUS T2000 (ASSÍNCRONO) 3 
NEXUS 1800 Ep Riad 8087 EMÍLIA B035 LINHA SCOPUS (*) ê 
| ALICE TVA 2170 à 

NEXUS 1684 PLACA MCOX GRAFIX MX80/MX100 TVA 3178 F 
UNITRON AP/TI PLACA MULTIUSUÁRIO MT200/MT250/MT440* TVA 3378 APLICISP 
MICROENGENHO PLACA COM-R (RJE) IMPRESSORAS DE LINHA TVA 3379 

PLACA MRL 300 A 1000 LPM 

PLACA MCR-3 

PLACA MPS * GRÁFICA E CORES * SOMENTE ALUGUEL 
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TEL PABK (071 224 1007. CEP 20050 "RIO DE JANEIRO, RJ INFORMATICA EMPRESARIAL LTDA. 










Assinante! 
Aproveite seu 
desconto de 1 


Digitação não é 
mais problema 


EZB)ist EEEIsavelEEist RES veltEistHESsaveltEistHE 









Agora você não precisa mais ficar horas intermináveis na fren- 





te do micro digitando aquele programa Peço enviarem lis 

legal. A equipe de MS se mobilizou pa- O ESsave o & 8.000 por unid.) 
ra colocar a sua disposição o maior acer- PEDID (Cr$ 24.000 por unid.) r 

vo de programas publicados no Brasil: os Valor 
programas da MICRO SISTEMAS. MS nº, pág: FAN dio 


Na revista você encontra toda a documen- 
tação necessária ao aproveitamento dos 
programas; no MS SAVE você tem o pro- 
grama gravado em uma fita cassete por 
quem sabe o que faz. 

Mas, se você é daqueles.que adora ir além, 
ou seja, estudar a estrutura dos programas, RENO pp a O ada 
então o MS LIST vai lhe deixar com água na dee tai e TE 

boca. Nele você tem as listagens em tama- 
nho natural para estudá-las com maior faci- 
lidade. é 

Então confira: MS SAVE e MS LIST, o casal 
do ano. 
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5 KVA por apenas 723 ORTN's. 


O Sistema No Break Guardian Linha 
Econômica tem o melhor preço do mercado 
por dois motivos: 

— A alta tecnologia aplicada no seu 
desenvolvimento. 

— A fabricação própria de componentes, 
tais como: transformadores, indutores, cartões 
impressos e gabinetes. 


Capacidades disponíveis: 
0,25; 0,4; 0,6; 1; 1,5; 2,5; 5; 7,5 e 10 KVA 
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SISTEMA NO-BREAK 


GUARDIAN GUARDIAN 
LI N HA ECO N Ô M I CA EQUIPAMENTOS ELETRÔNICOS LTDA. 


Rua Dr. Garnier, 579 - Rocha - CEP 20971 - Rio de Janeiro, RJ 


EN ERG IA À TO DA PROVA Tels.: Geral: PABX O) SAO? PABX (021) 201-0195 


São Paulo: Tel.: (011) 270-3175 









MOVEIS FILCRES: 


PROGRAMADOS 
PARA SEU 
MICROCOMPUTADOR. 





A BASE DO SEU MICRO. 


Procure o revendedor mais próximo 
ou ligue para a 

Central de Atendimento FILCRES 
Tel.: 223-7388. 

A FILCRES está a seu inteiro dispor. 





A FILCRES desenvolveu uma linha de móveis 
inteligentes, exclusivos para o uso em informática, 
oferecendo o espaço ideal para que seu 
microcomputador opere nas melhores condições, 
livre de possíveis adaptações. 

Os móveis FILCRES, além de serem projetados de 
maneira a proporcionar o máximo conforto ao 
operador, apresentam também, design moderno 

e avançado, estrutura de ferro pintado em epoxy 
revestimento em melamina, materiais que asseguram 
maior resistência e durabilidade à peça. 

A praticidade dos móveis FILCRES, irão garantir 
operações mais rápidas e racionais, 

dando ainda ao seu ambiente, um toque muito especial. 























MODELO - MLO38 
P/COMPUTADOR 


MODELO - MLO39 
P/IMPRESSORA 
















Os micros compatíveis com o Apple ou o TRS-80 podem gerar os acentos 
da língua portuguesa. Compare aqui os vários sistemas disponíveis 








Acentuação nos 
micros nacionais 


José Maria de Carvalho e Fabio Taveira Valadão 


utilização crescente de micro- 

computadores em Processa- 

mento de Textos forçou o 

mercado brasileiro a evoluir 
e aperfeiçoar-se no sentido de adequar 
os equipamentos nacionais — principal- 
mente os compatíveis com Apple e TRS- 
80, largamente utilizados profissional- 
mente — às regras de acentuação da lín- 
gua portuguesa. Existem áreas onde a 
aplicação das máquinas na edição de 
textos é particularmente importante, 
por exemplo as áreas jurídica e editorial, 
e, nesses casos, a obtenção de textos 
limpos e corretamente acentuados, tan- 
to no vídeo quanto na impressora, é 
obrigatória. 

Apesar desta necessidade flagrante, 
os fabricantes nacionais de micros das 
linhas Apple e TRS-80, na fase inicial 
de lançamento de seus produtos, não 
tiveram a preocupação de implemen- 
tar um sistema de acentuação em seus 
modelos. Talvez isto se explique pelos 
custos de desenvolvimento; necessida- 
de de entrada imediata no mercado ou 
mesmo porque os compradores ainda 
não eram exigentes nesta questão. 

O fato é que os equipamentos fo- 
ram, então, lançados totalmente com- 
patíveis com os modelos norte-america- 
nos, que não apresentavam acentuação 
devido às características da língua in- 
glesa. 

Antes do aparecimento de adapta- 
ções que possibilitassem a acentuação 
nos microcomputadores, para se obter 
textos impressos acentuados fazia-se uso 
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de alguns caracteres do código ASCII 
(ex.: &, ” ,% etc.) como indicativos de 
acentos. Com isto, o texto ficava prati- 
camente ilegível no vídeo, apresentan- 
do-se correto apenas quando impresso. 
Tudo isto era obtido graças às facilida- 
des que alguns programas processadores 
de textos apresentavam. A desvantagem 
na utilização deste processo é que ele 
“suja” demasiadamente o vídeo, e com 
isto deixa de realimentar o operador, 
que só vai perceber algum erro após có- 
pia impressa, o que conduz a um maior 
gasto de tempo. 


Após uma fase inicial, foi introduzi- 
do no mercado o sistema IVANITA, 
pioneiro na implementação de acentua- 
ção de língua portuguesa em micros da 
linha Apple. O projeto independente, de 
autoria do engenheiro paulista Ivan Na- 
zarenko, serviu de inspiração a alguns fa- 
bricantes, que logo a seguir lançaram 
seus próprios produtos com implemen- 
tações semelhantes ao sistema Ivanita, 
ou mesmo com o próprio, através de 
acordos com o produtor. 


Pode-se afirmar mesmo que o apare- 
cimento destas adaptações contribuiu 
para uma maior participação da linha 
Apple no mercado, pois era uma opção 
interessante ao usuário e, na época, ex- 
clusiva para esta classe de equipamentos. 
Só recentemente foram propostas solu- 
ções para os micros da linha TRS-80, 
com a introdução no mercado do siste- 
ma MULTPRINT. 

Com estes sistemas, que apresentam 


no vídeo e na impressora caracteres 
acentuados, o operador pode ver, direta- 
mente no vídeo, o que está digitando, 
podendo corrigir seus erros antes de ob- 
ter cópia impressa. Estas implementa- 
ções podem ser exclusivamente soluções 
de hardware ou um misto de hardware 
e software, como veremos adiante, e 
possuem regras diferenciadas de opera- 
ção na colocação dos caracteres acentua- 
dos. Além disto, diferem no conjunto de 
acentos disponíveis e nos recursos ofere- 
cidos: por exemplo, alguns sistemas per- 
mitem a acentuação de letras maiúsculas 
apenas no texto impresso, outros não. 


IMPLEMENTAÇÕES 
PARA LINHA APPLE 


Além dos sistemas que já vêm incor- 
porados em alguns micros da linha (Exa- 
to Pro — CCE; APII TI — Unitron; Craft 
IH Plus — Microcraft; Microengenho II — 
Spectrum), existem ainda as implemen- 
tações indeperdentes, como as placas 
Ivanita e Multprint, geralmente vendidas 
pelas lojas especializadas. No quadro 1, 
fazemos uma comparação entre esses di- 
versos sistemas. 


IVANITA 


O sistema Ivanita é composto de uma 
placa que substitui a PROM geradora de 
caracteres do micro e vem acompanhada 
de um software, em disquete, chamado 
DRIVER IVANITA. A placa viabiliza a 
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introdução dos caracteres acentuados no 
vídeo e, para obtenção desses elementos 
na impressora, o software DRIVER IVA- 
NITA permite a geração de um arquivo 
PRINTER DRIVER, que se encarrega 
de compatibilizar a impressora utilizada 
com o sistema (desde que o padrão do 
periférico esteja previsto no menu do 
DRIVER IVANITA). O arquivo PRIN- 
TER DRIVER, juntamente com um 
editor de textos — Magic Window ou 
Apple Writer —, possibilita a geração de 
textos com acentuação na impressora. O 
sistema Ivanita, porém, não permite a 
acentuação em (P/M 80 colunas. 
A única restrição ao sistema é que, 
no vídeo, é possível acentuar apenas as 
letras minúsculas. A obtenção de letras 
maiúsculas acentuadas na impressora é 
feita através do uso de delimitadores (':, 
aranha) que indicam para a rotina PRIN- 
TER DRIVER quando uma palavra, em- 
bora estando escrita no vídeo em letras 
minúsculas acentuadas, deve ser impres- 
sa em letras maiúsculas acentuadas; estes 
delimitadores são impressos como espa- 
ços. 
O fabricante, contudo, prepara para 
o mês de julho uma segunda versão da 
placa (Ivanita II), que permitirá traba- 
lhar em CP/M 80 colunas, e também a 
acentuação de letras maiúsculas no ví- 
deo, eliminando-se o recurso dos delimi- 
tadores. 


MULTPRINT 


O sistema Multprint é o único que 
não necessita de software adicional, sen- 
do uma solução totalmente de hard- 
ware e, por isto mesmo, compatível com 
qualquer programa existente. 

Ele é composto de uma placa, que 
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substitui a PROM geradora de caracteres 
do micro, e de um adaptador para im- 
pressora que é ligado externamente en- 
tre o equipamento e o cabo da impres- 
sora e que, fisicamente, tem as di- 
mensões de um cartucho de videogame. 
Com o Multprint é possível obter carac- 
teres acentuados maiúsculos e minúscu- 
los, sendo o texto do vídeo igual ao que 
é impresso, isto devido à inexistência de 
caracteres delimitadores presentes no ví- 
deo. É possível usar acentuação em qual- 
quer programa sem necessidade de adap- 
tações, mesmo em BASIC, A única res- 
trição é que no programa ou no BASIC 
tenhamos letras minúsculas e maiúscu- 
las. 

O Multprint é compatível com as im- 
pressoras existentes no mercado que 
possuam caracteres acentuados (Mônica; 
Grafix; P-S0O e as com padrão Embra- 
tel), podendo adaptar-se a qualquer pa- 
drão por encomenda ao fabricante. O 
sistema é apresentado em duas versões: 
modelo IC, para uso em 40 colunas; e 
modelo IE, para ser acoplado diretamen- 
te no cartão 80 colunas e uso em CP/M. 


EXATO PRO 


O sistema adotado pela CCE em seu 
micro tem características bastante seme- 
lhantes ao Ivanita. O Exato Pro possui 
um circuito incorporado ao gerador de 
caracteres que permite a acentuação, 
sendo vendido juntamente com um edi- 
tor de texto, CCE Super Texto, seme- 
lhante ao Magic Window, através do qual 
o usuário pode obter caracteres acentua- 
dos no vídeo e na impressora. O editor 
de textos da CCE é configurável à maio- 
ria das impressoras que possuam caracte- 
res acentuados. 


Como no Ivanita, não é possível a ob- 
tenção de caracteres acentuados maiús- 
culos no vídeo, sendo necessário o uso 
de delimitadores no texto. A acentuação 
é possível no vídeo e na impressora ape- 
nas quando se está usando o editor CCE 
Super Texto, ou outros programas adap- 
tados, não sendo possível o uso de acen- 
tuação diretamente em programas BA- 
SIC. 

CRAFT II PLUS 


A Microcraft comercializa seus mi- 
crocomputadores com o sistema Ivanita 
incorporado, fornecendo juntamente 
com o manual do micro a documenta- 
ção da placa. Portanto, todas as caracte- 
rísticas já descritas para o sistema Ivani- 
ta são válidas para o Craft II Plus. 


MICRO ENGENHO II 


A software-house Microarte desenvol- 
veu para este micro o programa Editex, 
um editor que permite a acentuação de 
letras minúsculas e maiúsculas no vídeo 
e na impressora. A acentuação é seme- 
lhante a de uma máquina de escrever, na 
qual primeiro é teclado o acento deseja- 
do e, em seguida, a letra a ser acentuada. 

O Microengenho II já é comercializa- 
do com os símbolos indicativos dos acen- 
tos impressos no teclado. A acentuação, 
contudo, é possível apenas com a utili- 
zação do Editex, que permite, através 
de menu, configurar o micro para vários 
padrões existentes nas impressoras do 
mercado. 


API TI 
O TI, da Unitron, possui um teclado 


inteligente controlado por microproces- 
sador específico (6504) é que, além de 
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Disposição das letras acentuadas no teclado de micros da linha TRS-80 (CP-500; DGT-1000) para o sistema Multprint. 


outras funções (teclas programáveis pelo 
usuário), permite acentuar minúsculas 
no vídeo e impressora. Não é possível a 
acentuação de maiúsculas no vídeo, 
além de não existir trema (ú). 

Temos no mercado a impressora Gra- 
fix que pode ser adquirida já com o pa- 
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drão Unitron em sua PROM de caracte- 
res. Para utilizar o APII TI com outro 
tipo de impressora, faz-se necessário o 
uso da interface Graph +, fabricada pela 
própria Unitron, e do comando especial 
para acentuação CTRL 1 A (que conver- 
te determinados caracteres -»:> : < 


&; O ;N etc. — para sinais de acentua- 
ção, de acordo com o padrão Abicomp). 


IMPLEMENTAÇÕES 
PARA LINHA TRS-80 


Em relação à linha TRS-80, não exis- 2a 


MICRO SISTEMAS, julho/85 






CHEGOU MULTILIST. 
ESQUEÇA 
AFASE NEGRA 
DASUAVIDA. 


Multilist é um papel autocopiativo | 
para listagem de computadores 
de qualquer porte. Ele é revestido 
com uma camada invisível 
de corante, suficiente para fazer 
cópias limpas, nítidas e legíveis 
em até três vias, eliminando o uso 
do carbono intercalado, 
comum nos formulários contínuos. 
Multilist aumenta a produtividade 
da impressora, simplifica diversas 
etapas após o processo 
de impressão e reduz o trabalho 
do operador. Esqueça a fase 
negra da sua vida. Use Multilist. 
Entre na Era da Informática. 


UM PRODUTO 
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NÃO DEIXE SEU SOM VIRAR RUÍDO. 


Um dos componentes mais importantes para diversos tipos e bitolas e seus lances são 
que seu som não vire ruído são os cabos cortados no comprimento exato. Entretanto, 
AUDIOFLEX. Eles são fabricados com as o mais importante é que os cabos 

melhores máquinas e equipamentos, e sua AUDIOFLEX são fabricados pela KMP - uma 
qualidade é controlada em toda linha de empresa que utiliza a melhor matéria prima, 
fabricação, o que assegura continuidade de pessoal brasileiro altamente especializado e 
características elétricas ao longo de toda linha. tem como ponto principal a qualidade dos 
Os cabos AUDIOFLEX são produtos que fabrica e um 


produzidos com cobre e Índice de nacionalização de 
eletrolítico e polietileno novos - AU DIOFLEX quase 100%. Aplique na 


nada de matéria prima engenharia da KMP. 
recuperada. Sua montagem é Seu som não deve virar 
rápida e fácil. São fabricados ruído. 


Cabos Especiais e Sistemas Ltda. 
BR 116/km 25 - Cx. Postal 146 - 06800 
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tem fabricantes incorporando em seus 
micros facilidades para acentuação, ha- 
vendo uma opção independente disponí- 
vel no mercado, que é o sistema Mult- 
print. Tal sistema para a linha TRS-80 
tem características semelhantes à sua 
versão para linha Apple, sendo igualmen- 
te composto da placa que substitui a 
PROM de caracteres e do adaptador 
para impressora. 

O texto presente no vídeo é idêntico 
ao impresso, com todos os acentos pre- 
vistos no Português, em maiúsculas e mi- 
núsculas. Também na versão TRS-80, a 
placa Multprint é comercializada em 
duas versões: o sistema IIC, para micros 
compatíveis com o modelo III; e o TD, 
compatível com o TRS-80 modelo 1. 


Uma outra implementação simples, 
mas de difícil operação, é utilizada pelos 
funcionários da Embratel ligados à rede 
Ciranda. Utilizando o editor de textos 
Superscripsit e modificando os conteú- 
dos originais da PROM geradora de ca- 
racteres do micro (CP-500) e da impres- 
sora (Mônica), eles conseguem obter 
acentos tanto no vídeo quanto na im- 
pressora. O padrão utilizado na PROM 
da impressora foi “batizado” padrão 
Embratel, e a Elebra fornece impresso- 
ras Mônica já com este padrão para os 
funcionários da empresa. Embora a acen- 
tuação seja de difícil operação, fique 
restrita ao uso do programa Superscripsit 
e altere as características originais do 
micro, esta solução é de baixo custo. 


COMPATIBILIDADE 
COM AS IMPRESSORAS 


Com o surgimento dos vários sistemas 
para acentuação nos micros fabricados 
no Brasil, o principal problema detecta- 
do foi como compatibilizar tais sistemas 
com as impressoras que existiam no 
mercado. 

O que aconteceu, num primeiro mo- 
mento, foi que, tanto a Unitron, com 
seu micro APII TI, quanto o fabricante 
da placa Ivanita criaram padrões pró- 
prios de códigos para caracteres acentua- 
dos, passando, então, a fornecer PROMs 
para equipar as impressoras. Posterior- 
mente, os fabricantes de impressoras co- 
meçaram a oferecer versões desses peri- 
féricos compatíveis com um ou outro 
sistema. 

Outros fabricantes de micros e pro- 
dutores independentes lançaram seus sis- 
temas de acentuação, tornando-os com- 
patíveis com os diversos padrões já exis- 
tentes no mercado de impressoras (Mi- 
crocraft; Spectrum; CCE e Microdesign, 
fabricante da placa Multprint). 

Podemos identificar, atualmente, 
como principais padrões de códigos exis- 
tentes no mercado de impressoras: 

— Padrão Ivanita: encontrado em im- 


MICRO SISTEMAS, julho/85 


pressoras Grafix, Elebra, Ecodata e El- 
gin (140L), ou mesmo em outras mar- 
cas adaptadas para funcionarem em mi- 
cros da linha Apple que possuam tal sis- 
tema instalado. 
— Padrão Embratel: encontrado nas im- 
pressoras Mônica utilizadas pelos funcio- 
nários da empresa em micros CP-500. 
— Padrão Unitron: encontrado em im- 
pressoras Grafix, podendo ainda serem 
utilizadas, mediante placa Graph +, as 
impressoras da Sistema ou Elebra. 

adrão Abicomp: este padrão é uma 
tentativa de padronização a nível nacio- 
nal, Possui um conjunto de caracteres 
acentuados que inclui até acentos inexis- 
tentes na língua portuguesa (por exem- 
plo, o “fi” do espanhol), para facilitar 
a aceitação dos produtos nacionais no 
mercado exterior. Pode ser encontrado 
em impressoras Mônica. 

Alguns modelos de impressoras não 
possuem caracteres acentuados e, nesses 
casos, é necessária a troca da PROM de 
caracteres do periférico. 


CONCLUSÕES 


O usuário poderá, neste momento, se 
perguntar: qual, afinal, é o melhor siste- 
ma de acentuação? A resposta vai de- 
pender da aplicação que se queira dar ao 
equipamento; da linha deste e mesmo 
do fator custo. 

Em se tratando da linha Apple, que 
oferece múltiplas opções, a decisão fica 
menos óbvia. Se você já possui um mi- 
cro com sistema incorporado pelo fabri- 
cante, aceite as limitações porventura 
existentes, visto que não vale a pena tro- 
car o sistema, mesmo porque podem 
aparecer problemas de compatibilidade. 
Já se você pensa em comprar um micro 
ou possui um sem sistema de acentua- 
ção, verifique no quadro | a compara- 
ção entre as várias opções existentes e 
escolha a que melhor se adapte às suas 
necessidades, 

Para finalizar, é bom salientar que, 
para evitar surpresas, o usuário deve, 
antes de se decidir por algum sistema, 
verificar se a sua impressora tem caracte- 
res acentuados; senão já deve ir provi- 
denciando, juntamente com a compra 
do sistema escolhido, a adaptação perti- 
nente. 
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Afinal 
uma impressora 
que oferece 
preço baixo, 
qualidade, 
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bom pá papo. 
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A Racimec apresenta a lta. 

E faz questão de mostrá-la a você 
pessoalmente. 

Dê um pulo à Racimec. Com todo 
conforto, você vai conversar com quem 
mais entende de Ita: os técnicos da 
Racimec. Com direito a ar refrigerado 
e cafezinho no ponto. 

Mas lembre-se: esta promoção 
é válida por pouco tempo. Incluindo 
o preço especial de lançamento. 

A Ita espera por você. 

Apareça. 





*Cabeça para 300 milhões de caracteres 
100 cps, 132 posições, 33 linhas por minuto, 
caracteres semi-gráficos e em português, 
saída serial paralela 
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Quantas vezes você já pensou em mudar de equipamento e desistiu? 
Que trabalho, não?! Pois este artigo mostra que migrar para outra 
linha ou apenas trocar arquivos não é coisa de outro mundo 








Compatibilize seus 
arquivos Visicalc 


José Carlos Niza e Ronaldo Curi Gismondi 


os milhares de programas que existem no mercado, 

alguns possuem versões para mais de uma linha de 

micros. O exemplo mais expressivo destes progra- 

mas é o Visicalc, que é encontrado para as linhas 
TRS-80, Apple e IBM PC. 

Embora o programa tenha a mesma filosofia de funciona- 
mento para os diversos micros, os arquivos por ele gerados são 
incompatíveis entre si, mesmo porque a formatação dos dis- 
quetes dessas três linhas são totalmente diferentes, sendo daí 
impossível a permuta de disquetes. 

Se o leitor tiver um compatível com TRS-80 e quiser migrar 
para a linha Apple, ou vice-versa, ou simplesmente trocar ar- 
quivos entre os dois micros, este artigo possivelmente o ajudará 
neste intento. 

Para que a transferência dos dados em arquivos se efetue, o 
usuário deverá dispor de programas emuladores para cada um 
dos micros que irão se comunicar. Além dos dois micros terem 
que possuir a interface RS 232, um fator importante é a cons- 
trução do cabo de interconexão. (Ver box). 


A R$ 232-€ 


Muito provavelmente, a interface RS 232 é a ferramenta 
mais poderosa de seu microcomputador. Mas por que isso? E o 
que é RS 232? 

Para esclarecer essas e muitas outras perguntas, vamos anali- 
sar alguns conceitos prévios. É bom lembrar que,em MS nº 42, 
num excelente artigo de Roberto Quito Sant' Anna, as interfa- 
ces RS 232 são abordadas com bastante profundidade e, sem 
dúvida, sua leitura trará um grande embasamento para todo lei- 
tor que quer se aprofundar no assunto. 

Dentro de qualquer computador, existe um grande número de 
componentes eletrônicos que se comunicam entre si. É através 
desta intercomunicação, e através de sinais, que o computador 
está apto a executar determinadas funções. Vamos dar um 
exemplo: o microcomputador se comunica com as memórias 
através de inúmeras linhas (endereços e dados). Como há ne- 
cessidade de grande velocidade e quantidade de informações, 
esta comunicação é feita através de linhas em paralelo, otimi- 
zando, assim, todo o processo. 

Este raciocínio é válido para a comunicação do micro com 
o mundo exterior. Assim um micro pode comunicar-se com 
uma impressora através de várias linhas (cabo paralelo), num 


14 





processo chamado de comunicação paralela. A mais comum é a 
do tipo Centronics, e podemos dizer que quase todos os compu- 
tadores do mercado estão aptos a usá-la. Há, porém, várias des- 
vantagens neste tipo de comunicação, sendo a principal o fator 
distância: um cabo de grandes dimensões (maior que três me- 
tros) fatalmente atenuará O sinal, não se prestando para comu- 
nicações a maiores distâncias. 

Daí haver um segundo meio de propagação de informações; 
a comunicação serial. Como o próprio nome sugere, os dados 
seguem em série, através de um cabo, até seu destino. Como 
no exemplo acima, a ligação micro-impressora pode ser feita 
através de uma comunicação serial, com algumas vantagens. 
Mas nem tudo é lucro, pois normalmente este tipo de ligação é 
mais difícil e precisa de um software de apoio. 

Uma das grandes vantagens da comunicação serial é poder- 
se utilizar meios já existentes (como o telefone), para se ligar 
dois ou mais micros. 
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Figura 2 


A interface RS 232 nada mais é que um padrão de comuni- 
cação serial que atende às conformidades da EIA “Eletronics 
Industries Association”. Não fosse isso, e se cada fabricante es- 
colhesse o seu padrão, teríamos uma verdadeira Torre de Babel 
entre os micros. 


O PADRÃO 


O “C” no RS 232 refere-se a uma particular versão (—5 
volts a —15 volts nível “1”; e +5 volts a +15 volts nível 0"). 
Veja a figura 1. 

Embora se usem somente algumas linhas do RS 232-C 
temos, na figura 2, o conector (do tipo DB), formado por 
25 pinos, bem como uma descrição dos sinais mais usados. 


TAXA DE TRANSMISSÃO 


Um outro fator importante é a taxa de transmissão, que é 
o número de ciclos de meio/ponto transmitidos em segundos 
(baud). 

Para simplificar, diremos que 1 baud é igual a taxa de 1 
bit, quando um bit de parada é usado, ou simplesmente, como 
exemplo, diremos que 300 bps significam 300 bits por segundo. 


TÉCNICAS DE TRANSMISSÃO 


Como vimos anteriormente, o computador se comunica por 
dentro em forma de sinais paralelos. Para serializálos, existe 
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um componente (UART) que transforma estes dados paralelos 
em seriais. 

Cada bit é transmitido através de uma linha e é, na realida- 
de, um impulso elétrico que será recebido pelo receptor, na 
outra extremidade, que deverá saber interpretá-lo. Esta sincro- 
nização transmissor/receptor pode ser de dois tipos: assíncrona 
ou síncrona. 

A maioria dos microcomputadores usa a operação assíncro- 
na, e é dela que nos ocuparemos. Observe abaixo: 


Start Bit Parity Bit 


t 


Stop Bit 
Beda 














Transmissão Assíncrona 


Temos aí um start bit, um grupo de bits (dados) e um stop 
bit, permitindo, desta forma, que o transmissor gere informa- 
ções em caráter aleatório e que elas sejam sempre compreen- 
didas pelo receptor, tendo-se em vista que o que delineia um 
determinado dado é o bit de início (start bit) e um ou dois 
bits de término (stop bit). Uma observação importante é que o 
comprimento do dado é opcional, pondendo ser de 5,6, 7 ou 
8 bits. 


CONEXÃO ENTRE EQUIPAMENTOS RS 232 


Desde que os equipamentos possuam interfaces RS 232, é 
possível comunicá-los entre si (o software de apoio, neste caso, 
deve coadunar os equipamentos quando estes são de origem 
diferente). 

É importante saber se o equipamento é DTE (Equipamento ,, 
terminal de dado 1) ou DCE dE nipaganto de comunicação de & 
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COMPATIBILIZE SEUS ARQUIVOS VISICALC 





dados). No primeiro caso, temos as impressoras seriais, plotters 
etc., e, no segundo, o modem. 

No artigo de Roberto Quito de Sant Anna, em MS nº 42, as 
peculiaridades das ligações entre os diversos equipamentos são 
exploradas com detalhes. Aqui faremos apenas uma ilustração 
simplificada destas ligações. 

Micro — Impressora — Uma forma genérica de ligação é 
dada baixo: 


7 SGND 7 
TRAMSMISSOR 1 PGND 1 RECEPTOR 


De uma forma mais ampla, devem-se ligar também os pinos 
4,5,6,8, 10 e 22, quando houver necessidade. , 

Micro-Modem — O modem é o equipamento que permite a 
comunicação de dois micros através de um telefone. A palavra 
modem (MODulador/DEModulador) indica as funções que ele 
executa. No primeiro caso, ele pega um sinal digital e o codifi- 
ca em um sinal analógico, modulando-o a seguir e permitindo, 
desta forma, que o sinal esteja pronto para ser transmitido por 
uma linha telefônica. 

No segundo caso, sua função é exatamente a inversa, permi- 
tindo que o modem entregue ao microcomputador um sinal di- 
gital, que é exatamente o mesmo que foi originariamente envia- 
do pelo micro. Também aqui os pinos usados normalmente 
para comunicação são os mesmos analisados anteriormente. 

Micro — Micro — Este meio de comunicação permite que se 
liguem dois computadores, diretamente entre si, através de um 
cabo (a distância entre eles não deve exceder a cinco metros). 

Em nossa experiência (transferir arquivos do Visicalc) utili- 
zamos um micro JP.01, compatível com o TRS-80 modelo I, e 
um Dismac-8100A, compatível com o Apple II Plus. O soft- 
ware de comunicação do TRS foi o Microterm 1.4, da Micro- 
Systems Software Inc.; e do D-8100A, o ASCII Express, da 
Southwestern Data Systems. 

Em primeiro lugar, deve-se colocar os arquivos a serem 
transferidos no mesmo disquete onde está o software de comu- 
nicação que passaremos a chamar de emulador. Caso se dispo- 
nha de dois drives, melhor. Bastará que o emulador e os arqui- 
vos estejam em discos com sistemas operacionais compatíveis 
entre si. No caso, usamos o Newdos 2.0, da Apparat Inc., no 
JP; sendo que o emulador do Dismac estava em DOS 3.3. 

Vamos descrever agora, com detalhes, o uso dos dois emula- 
dores, descrevendo os comandos usados para a transferência. 
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Certificar-se de que o buffer está aberto. Caso não esteja, ir 
ao modo de comando, teclando o CLEAR e, em seguida, pres- 
sionar o B, observando a mudança no vídeo da indicação 
“B: Close” para “B: Open”, quando, então o buffer estará 
pronto para receber dados. Convém, ainda, esvaziar o buffer, 
o que se consegue teclando a letra C. Neste momento, obser- 
var que, do lado direito do vídeo, aparecerá “Buf used: 0”, sig- 
nificando que o buffer está limpo. 

Deve-se, ainda, fixar os parâmetros RS 232 que serão usa- 
dos. Isso se faz acionando a tecla R. Em seguida, aparecerá na 
tela “R: Baud?”. Escreva 300 e dé um ENTER. A seguir, apa- 
recerão “R: Word:”, “R: Stop” e “R: Parity”. Após cada uma 
das três solicitações, tecle, respectivamente, 8 ENTER; 1 
ENTER e N ENTER (os números se referem aos numerais e 
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Construção dos Cabos 













s interfaces RS 232 têm 25 pinos, dos quais os mais usados 
los neste artigo. 
lógico supor que ao se ligar dois micros através de suas 
interfaces RS 232, poderá haver uma incompatibilidade entre 
seus pinos, pois, os pinos 2 e 3, por exemplo, têm a mesma fun- 
ção, Na r ide, para que houvesse a comunicação entre os dois 
micros, deveria ser ligado o 2 com o 3 e vice-versa, 

No entanto, existem no mercado interfaces RS 232 para a li- 

nha Apple que permitem que se faça a ligação pino a pino, sem 
ualquer alt fo no cabo. É o caso, por exemplo, da interface 
fabricada pela Unitron. 

Leia com atenção o manual de sua interface RS 232 e, se ela 
tiver esta vantagem, a implementação se fará com a simples troca 
de um “bloco JUMPER” Cio permite que a interface seja colo- 
cada no modo DCE ou DTE, bastando inverter o jumper. 
proceda como se segue, que foi o que tivemos 

próprio cabo. 


dois computadores deve estar configura- 
ligue os fios aos 1,2,3,4, EMA 
conectores DB-25 (conector macho RS 232). 
Do à teremos outro conector macho RS 232 — 25 pi- 
nos, Os fios oriundos dos pinos 1, 7, 8 e 22 de um lado devem 
ser tes do outro conector (1 








“com 1, 7 com 7, etc.). Ligue o de número 2 de um ao 3 do outro 
lado; o 3como 2;0 4 como 5;0 5como4;0 6como20;eo 
20 como 6 do outro lado. O cabo está pronto. 


não ao número de vezes de se pressionar o ENTER). Assim es- 
taremos transmitindo ou recebendo palavras de oito bits, sem 
paridade e com 1 stop bit (veja explicações anteriores sobre 
transmissão e recepção de dados). 


Se a intenção for de receber um arquivo, bastará dar o co- 
mando de transmissão no outro micro e ele será recebido na 
memória do TRS. Ao terminar a recepção, teclar a letra S, o 
que redundará em gravar o conteúdo do buffer no disco. O 
programa, neste momento, dará a mensagem “S: filespec:”. 
Teclar, então, o nome a ser dado ao arquivo (segue-se um 
ENTER) que, uma vez gravado no disco, poderá ser usado dire- 
tamente no Visicalc. 


Observar, no entanto, que deverão ser respeitados os recur- 
sos de cada programa. Por exemplo, o Supervisicalc ou o 
Circalc permitem alterar a largura de uma só coluna, o que não 
se consegue no Visicalc. Nesse aspecto, podem ser necessárias 
algumas adaptações. 


O arquivo Visicalc a ser transferido não precisará, necessa- 
riamente, estar gravado no formato “DIF”, ao ser enviado a 
outro micro. Em se tratanto de transmissão de arquivos Apple 
para TRS, observamos que esse procedimento, às vezes, é mais 
adequado, embora demorado. 


Se a intenção é transmitir um arquivo do TRS para o Apple, 
proceder da mesma forma até esvaziar o buffer e, então, acio- 
nar a tecla L, afim de colocar o arquivo a ser enviado dentro da 
memória. Após apertar L, aparecerá a mensagem “L: filespec:”; 
então, deve-se escrever o nome do arquivo a ser colocado na 
memória do micro, seguido de dois pontos e o número do 
drive onde ele se encontra (ex.: “1: filespec: MATRIZ/S85:2) e 
teclar ENTER. Assim, o arquivo irá para a memória do compu- 
tador. Em seguida, pressionar 'o T, que é a chave de transmis- 
são do conteúdo do buffer, e apertar o ENTER três vezes. 
Nesse momento, certifique-se de que o computador está pron- 
to a receber os dados. Se estiver tudo certo, tecle CLEAR ea 
transmissão terá início. Não se esqueça de colocar os dois com- 
putadores em half duplex, para poder acompanhar, nas duas 
telas, a transferência de dados. 


ASCII EXPRESS 


Para receber um arquivo no Apple, carregar o ASCII EX- 
PRESS, dar o comando CONTROL Q (daqui por diante usare- 
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mos o símbolo “A” para representar o CONTROL). Em segui- 
da, teclar U e aparecerá um menu, dentro do qual se deve ob- 
servar, principalmente, as opções E e F. Teclado E, sucessiva- 
mente, haverá uma alternância entre half e full duplex. Colocar 
em half duplex. Acionando o F, alteraremos o data word 
format, isto é, a forma de envio/recepção dos dados, e aparece- 
rão várias opções. A escolhida deverá ser a de número 5, isto é, 
“8 N 1” (8 bits, no parity, 1 stop bit). Após a escolha, pressio- 
nar a letra X para voltar ao modo terminal. 

Como passo seguinte, teclar A R, uma ou duas vezes, até 
obter a mensagem “copy on”, significando que o buffer estará 
pronto a receber dados. Acionar, ainda, A C (para limpar a me- 
mória). Ao terminar, o Apple estará apto a receber dados do 
outro micro. Ao acabar a recepção, retirar o disco do ASCII 
EXPRESS e colocar aquele no qual se deseja gravar O arquivo 
recebido. Teclar, então, AW e responder à pergunta 
“Filename?” com o nome do arquivo a ser gravado seguido de 
RETURN. Pronto! O arquivo, então, é gravado no disco. 


Para transmitir um arquivo do Apple para outro compu- 
tador, proceder até onde indica o parágrafo anterior, acio- 
nar o AQ e,a seguir, o S. O ASCII EXPRESS perguntará 
“Filename?”. Nesse momento, retirar o disco com ASCII 
EXPRESS e colocar o que contém o arquivo a ser transmitido. 
Escrever o nome do arquivo a ser enviado e pressionar o 
RETURN quatro vezes. Logo após, aparecerão as perguntas 
“S)standard or PJrotocol?”, “Line or Character?” e 
“Prompt”. Pressionando o RETURN quatro vezes, conforme 
indicado anteriormente, assumiremos os defauts para as per- 
guntas acima, optando por transmitir em standard, linha por 
linha e sem aguardar um possível prompt após cada linha. 





CONCLUSÕES 


Até onde experimentamos, os arquivos Visicalc do JP-01 
foram aceitos e funcionaram perfeitamente no Visicalc e Super- 
visicalc carregados no Dismac D-8100 e vice-versa. 

Além dos softwares de comunicação citados, acreditamos 
não haver dificuldades em se usar outros, com recursos seme- 
lhantes.. 

No momento estamos testando a transferência de arquivos 
de processadores de texto, sendo que já obtivemos bons re- 
sultados na transferência de arquivos do Scripsit para o Magic 
Window II, 

Tencionamos realizar testes semelhantes entre computado- 
res compatíveis com o TRS-80, Apple e IBM-PC. Aliás, aí está 
uma boa sugestão de trabalho para os leitores. 

Finalizando, gostaríamos de deixar claro que a interface 
RS 232, embora ofereça um grande potencial para comunica- 
ção entre equipamentos, é por si própria um sistema sofistica- 
do e, de certa forma, um pouco complexo para utilização, tor- 
nando-se necessária uma familiarização do usuário com o siste- 
ma, para que se possa obter o máximo de potencialidade de 


sua RS 232. m 
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Utilitários 
Apple 


Toda a coleção de pro- 
gramas utilitários para 
Apple da Beagle Bros, soft- 
wan-house americana, se 
encontra à disposição dos 
consumidores brasileiros, 
numa versão especial, tra- 
duzida e melhorada pela 
Potencial Software de Cam- 
pinas (SP). 

Os programas incluem 
editores de gráficos; utili- 
tários; melhoramentos no 
sistema operacional (Super 
DOS); editores de textos, 
DOS BOSS (altera os co- 
mandos do DOS); progra- 
mas de alta resolução gráfi- 
ca e inovações no Apple- 
soft BASIC (BASIC PRO). 

O preço médio unitá- 
rio é de Cr$ 90 mil, o que 
inclui disquete e manual 
de operação. Os programas, 
inicialmente, serão comer- 
cializados através de Mi- 
CRO SISTEMAS, 

O endereço da Poten- 
cial Software é Rua José 
Vilagelin Junior, 52 — Cam- 
buf, tel.: (0192) 53-6992 — 
Campinas, SP. 














Digiponto 
visa 
exportação 


A Digiponto, primeira fabri- 
cante nacional de teclados para 
computadores, está comemorando 
sete anos de criação. A empresa 
começou com 30 funcionários no 
bairro da Saúde, no Rio de Ja- 
neiro, e hoje conta com mais de 
600, instalados em Vicente de 
Carvalho, numa área de 35 mil 
metros quadrados. 

A Digiponto atende a grande 
parte da indústria nacional de 
computadores e agora volta-se pa- 
ra a exportação. Contatos já fo- 
ram mantidos com a França, Ar- 
gentina, China, México e Vene- 
zuela com o apoio da ABICOMP, 

Durante este ano serão lança- 
dos dois novos tipos de teclados 
utilizando tecnologia capacitiva. 
Esta tecnologia permite atender 
melhor aos requisitos de ergo- 
nomia e manter a alta durabilida- 
de e confiabilidade dos teclados. 


A Lotus no Brasil 


O Sr. Stephen Khan, Interna- 
tional Manager da Lotus, famosa 
software-house norte-americana, 
veio ao Brasil e realizou palestras 
no Rio e em São Paulo. Além de 
descrever os principais produtos 
da empresa — os softwares 1-2-3 
e Symphony — apontando suas 
principais características técnicas, 
o Sr. Khan salientou que existe, 
por parte da Lotus, um enorme 
interesse no mercado latino-ameri- 
cano. 


A Lotus Development, funda- 
da em 1982, atingiu sucesso e ní- 
veis de receita surpreendentes ao 
lançar nos Estados Unidos, em 83, 
o software 1-2-3, o primeiro a 
utilizar concretamente a noção de 
software integrado. O “best-seller"' 
1-2-3 possui funções de spread- 
sheet planilha eletrônica de cál- 
culo); banco de dados e gráficos 
integradas. 


O 1-2-3 já é bastante difun- 
dido no Brasil, sendo usado por 
praticamente todos os possuido- 
res de micros de 16 bits. Outros 
produtos da empresa — mais re- 
centes — ainda não são muito co- 
nhecidos entre nós. O Symphony 
já é comercializado aqui, e adicio- 
na às funções do 1-2-3, capacida- 
de para processamento de texto 
e transmissão de dados. O Jazz, 
último lançamento da empresa, 
foi desenvolvido para rodar no mi- 
cro de 32 bits Macintosh, da Apple 


Computer, que ainda não possui 
um compatível nacional. 


Todos são softwares destina- 
dos aos negócios de forma geral 
e a Lotus vende, ainda, os assim 
chamados “add-ins”. Para o Sym- 
phony, por exemplo, temos a 
possibilidade de acrescentar um 
Spelling Checker que cria um di- 
cionário e corrige erros e o Sym- 
phony Link que liga o PC a um 
mainframe. 


A razão principal da vinda do 
Gerente da Lotus ao Brasil, con- 
tudo, parece ter sido reiterar pe- 
rante à imprensa que a empresa 
brasileira Intercorp do Brasil é 
a sua única representante no mer- 
cado nacional. Tal preocupação 
é compreensível se considerar- 
mos que a empresa americana 
está procurando se salvaguardar 
da pirataria. 


Nos Estados Unidos estima- 
se que, de 1981 a 1984, as pro- 
dutoras de software deixaram de 
ganhar US$ 1.3 bilhões devido 
ao mercado pirata. 


No sentido de impedir que 
seus programas sejam indevida- 
mente comercializados aqui, mui- 
tas software-houses norte-ameri- 
canas optaram pela representação 
exclusiva, através da qual somen- 
te uma empresa fica autorizada a 
comercializar e prover treinamen- 
to em seus sistemas; ao menos 
teoricamente. 


















Lançamentos Digitus 


A Digitus, de Belo Horizonte, 
lança dois novos produtos no mer- 
cado. O primeiro deles, o Multi- 
Modem, opera em 300 bps, 1200 
half e 1200/75 full duplex. 

O segundo produto é o micro 
DGT-PR que permite ligação em 
redes, e emulação de terminal 
IBM inteligente. O micro vem 
com memória RAM de 128 Kb 
(expansível a 512 Kb); duas por- 
tas seriais RS-232 sendo uma sín- 
crona e outra assíncrona; interfa- 
ce para drives de 5 e 8" simultá- 
neos; controlador de vídeo para 
terminal gráfico colorido com alta 


resolução: 128.000 pontos (640 x 
240). 


Além dessas características, o 
DGT-PR possui teclado numérico 
separado, possibilidade de cone- 
xão de discos Winchester, sistema 
operacional CP/M 3.0, compati- 
vel com o CP/M 2.2, e software 
de conexão à rede CETUS. 


A DIGITUS fica na Rua Gá- 
vea, 150 - Jardim América - Tel.: 
(031) 332-8300. A filial do Rio 
de Janeiro fica na Rua Barata Ri- 
beiro, 391 - Copacabana - Tel.: 
(021) 257-2960. 


Unitron lança drive 


A Unitron, fabricante dos microcomputadores APIl e APII TI, 
está colocando no mercado seu mais novo produto. Trata-se do 
UD 5, um drive do tipo slim, para disquetes de 5 1/4" (FS/DD). 
Essa é a primeira incursão da Unitron no setor de periféricos. 
Segundo o diretor da empresa, Geraldo Azevedo, nos drives 


tradicionais há um aproveitamento de 35 trilhas, enquanto que 
na unidade UD 5 o usuário poderá utilizar 40 trilhas, 20 Kbytes 
a mais do que nos outros drives. O preço de lançamento é de 63 
ORTN, e já está prevista uma redução de 15% sobre este valor 
com o aumento da produção e do índice de nacionalização dos 
componentes. O UD 5 já pode ser encontrado nas lojas especiali- 
zadas, e será comercializado também em OEM, 





Microtec vende PC's para USP 






Ccteteo 


fm 


A Microtec saiu 
vencedora da con- 
corrência pública e- 
fetuada pela USP, 
Universidade de São 
Paulo, para o forne- 
cimento de 50 equi- 
pamentos compatí- 
veis com o IBM/PC. 

A Microtec con- 
correu com mais 
quatro empresas e se 
comprometeu a en- 
tregar o lote de 
máquinas PC-2001, 
que a universidade 
irá distribuir entre 
as faculdades e se- 
tores administrati- 
vos, por Cr$ 1,5 bi- 
SJ Ihão. 
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Sempre o melhor . 
EE = programa para você 


TELECOMUNICAÇÕES SOFTWARE 


e Programas para Projeto 
Cirandão 

e Programas para Video- 
texto da Telesp 

e Placas RS-232 


do Brasil que você pode: 
testar, usar, administrar, 
programar, desenhar e jogar 
livremente (Apple, TRS-80). 
E cartuchos para vídeo-games 
compatíveis com Atari. 


HARDWARE SUPRIMENTOS LIVROS 


e CPUs das linhas: e Formulários contínuos e Microproces. Z80 e 6502 


Apple, TRS-80 e Sinclair 
e Interfaces para: 
Disco, Impressoras, CP/M, 
80 colunas e Expansão de 
memória 
e Drives para vários modelos 


e Diskettes 


e Etiquetas 


e Cursos de Basic 

e Programação estruturada 

e Linguagens Basic, Cobol, 
Pascal 

e Circuitos Eletrônicos 

e Jogos Inteligentes 


e Monitores e impressoras e Fitas para impressoras e Revistas 
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Telsist expande sua 
produção de micros 





Desde que se desligou da Raci- 
mec, em fins de 1984, a empresa 
carioca Telsist vem cumprindo um 
plano estratégico bem definido 
para ganhar espaço, aos poucos, 
no mercado de equipamentos pro- 
fissionais. Em primeiro lugar, na 
luta por uma maior penetração 
nacional, foram abertas instala- 
ções em São Paulo. O próximo 
passo foi investir alto na propa- 
ganda de seus produtos. Os resul- 
tados já começam a surgir: a pro- 
dução mensal, hoje em torno de 
130 máquinas, está prevista para 
atingir 500 máquinas dentro de 
cinco meses. Para isto, a direto- 
ria estuda a construção de uma 
nova fábrica (a produção ainda é 
feita nas instalações da Racimec). 
Segundo Antonio Augusto Gomes 
de Mattos, Gerente de Negócios, 
em, no máximo, um ano a fábri- 
ca estará funcionando. 


As duas linhas de equipamen- 
tos da empresa são denominadas 
1000 e 2000. A linha 1000 con- 
siste numa rede multiusuária mo- 
dular, baseada em UCP de 8 bits 
Z 80A, com 64 Kb RAM, um dri- 
ve de 5” e disco Winchester de 
20 Mega. A UCP, denominada Tel 
1806, possui saída paralela (centro- 
nics) e oito portas seriais, sendo 
duas RS 232C e seis RS -422, para 
ligar-se às estações de trabalho. 
No extremo oposto da rede po- 
dem situar-se tanto os terminais 
inteligentes TEL 1800A, com 64 


que já vem equipado com dois dri- 
ves de 5”. O sistema operacional 
utilizado é o DOS-MB, compatível 
com o CP/M 2.2. 


A mesma concepção modular 
foi utilizada na arquitetura da li- 
nha 2000, que permite a ligação 
de equipamentos de 16 bits (8 ou 
16 workstations), monitorados 
pelo TEL 2608, que vem equipa- 
do com dois processadores, Intel 
80186 e Z 80A. As estações de 
trabalho 2605 podem vir em três 
versões: 2605-ET; PC ou XT. A 
versão ET, standard, possui 256 
Kb de RAM, expansível a 512 
Kb na própria placa ou 640 Kb 
mediante cartão de expansão. 
Através de seus 5 slots, podem ser 
a ele conectadas as expansões de- 
senvolvidas para os compatíveis 
com a linha IBM-PC. A versão 
2605-PC mantém as característi- 
cas do ET, porém já vem com dois 
drives de 5”, enquanto que o XT 
possui uma unidade de disco de 
5" e uma para disco rígido, com 
capacidade de 12.75 Mega. A ques- 
tão da compatibilidade fez com 
que a linha 2000 fosse concebida 
de forma a oferecer total comuni- 
cação com o padrão IBM-PC, e 
ainda compatibilidade com a linha 
1000, de 8 bits. Mesmo os que já 
são usuários de micros de 16 bits 
de outros fabricantes podem se li- 
gar à rede Telsist pois, segundo a 
diretoria, a própria empresa se en- 
carrega da tarefa de compatibilizá- 





Modem Para Renpac 


A ELEBRA TELECON está lançando o EM- 1275, um modem pro- 
fissional que também atende às ligações entre micros. 

Este equipamento pode trabalhar em três cliferentes velocidades: 
1200 bps com canal secundário de 75 bps; 1200 bps semi-duplex e 300 
bps semi-duplex e 300 bps duplex a 2 fios. Desta forma, o usuário que 
quiser interligar-se à “tela-serviços” (RENPAC, Cirandão, CBBSs, etc.) 
que operam a velocidades diferentes, poderá fazé-lo com o mesmo mo- 
dem. 

O EM-1275, também pode ser configurado com resposta automá- 
tica, em suas diferentes versões. O modem opera também em linha pri- 
vativa. O endereço da ELEBRA TELECON é Avenida Faria Lima, 1383 
— 69 andar/Jardim Paulista. Telefone (011) 813-9065 São Paulo (SP). 


No Rio, Avenida Rio Branco, 50/SL. Tel: (021) 2563-5596. 


O Computer Shopping Moore apresenta duas novidades: o 


alarme térmico 


e o detector eletrônico de fumaça, 
termômetro 


ambos da marca Sicurplex. O alarme térmico é um 
digital no qual pode-se 


duas temperaturas, uma míni- 


ma e outra máxima. Ultrapassados os parâmetros, o alarme é dis- 


iredaisi o detector de fumaça é composto por uma câmara 
ica, um sistema eletrônico de controle e um sistema de aviso 
com sirene. Ambos os aparelhos funcionam com pilhas alcalinas 
comuns e possuem ainda um sistema que avisa quando a pilha co- 


meça a ficar fraca. 





Otimismo na Clappy 


Após o pedido de concordata 
feito pela loja carioca Clappy Mi- 
crocomputadores Ltda. o clima 
na empresa é de otimismo, pelo 
menos por parte de seu presiden- 
te Alberto Mattos. Segundo ele, 
a recuperação da empresa é alta- 
mente viável e cita como moti- 
vos o fato de ter recebido um gran- 
de apoio dos fornecedores e clien- 
tes e de ter alcançado o fatura- 
mento de Cr$ 2 bilhões, um mês 
após o pedido de concordata. Al- 


200 milhões de pedidos em cartei- 
ra. 

Para superar a crise, a Clappy 
procedeu a uma contenção de 
despesas de cerca de 30%, incluin- 
do aí a diminuição do seu quadro 
de funcionários. Além disto, a em- 
presa vai reformular a filial de Co- 
pacabana, tornando-a um pólo ge- 
rador de cursos e treinamento 
para em presários e profissionais li- 

rais, direcionando seu comércio 
para a venda de soluções, isto é, 
pacotes prontos para determina- 


Kb RAM, quanto o TEL 1802, los. 
































* A SERVIMEC organizou dois seminários de Informática para este 
mês. São eles: MUMPS, de 3 a 5 das 9:00 às 17:30 h e “Programação 
Estruturada” de 29 a 31, no mesmo horário do primeiro. Maiores infor- 
mações: (011) 222-1511 (SP). * O Grupo Advancing de Porto Alegre 
programou para este mês os cursos de Automação Bancária; Redes Lo- 
cais; Acesso, Pesquisa e Recuperação de Informações em Bancos de 


Dados; e Comunicação na Informática. Mais informações pelos tels.: 
(0512) 26-8246 ou 26-1988. * O Banco do Estado de Goiás (BEG) ins- 
talou o Banktec, sistema de automação bancária da Itautec, nas suas 
agências de Goiânia. Até o final do ano o sistema será implantado em 
mais 17 agências. O BEG possui 66 agências em cinco estados (GO, RJ, 
SP, MG e DF). * A DISMAC lançou sua calculadora financeira: a HF- 
100 que faz cálculos de juros compostos, cálculos matemáticos, margem 
de lucro, porcentagem e vem com bateria de lítio, energia garantida por 
longo período. * O CDT — Centro de Desenvolvimento de Tecnologia e 
Recursos Humanos — oferece, este mês, cursos de confecção de circui- 
tos impressos e sistemas digitais. O CDT ficaem S. J. dos Campos. Maio- 
res informações, através do tel.: (0123) 21-9144 (ramal 236). * A Real 
Soft — Sistemas e Consultoria, informa que todos os aplicativos de seu 
catálogo estão disponíveis na versão 16 bits, para compatíveis com o 
IBM/PC. Entre os aplicativos encontram-se: Contas a Pagar e Receber; 
Controle de Loteamentos e Controle de Processo de Cobrança Mercan- 
til. Informações: (011) 241-1976 (SP). * Depois de 36 mil horas de 
testes em 50 clientes, a Itautec iniciou a produção em série do |-7000 
PC xt, o seu micro de 16 bits. A produção inicial é de 200 unidades por 


berto Mattos informou ainda quo 


a empresa está com mais de Cr dos segmentos do mercado. 









































mês devendo chegar a 300 ainda este ano. O micro, além de compatí- 
vel com o IBM/PCxt, roda todos os programas do 1-7000, o 8 bits da 
Itautec. * A Microdigital, através da sua software-house Microsoft, está 
colocando no mercado o programa “Passo a Passo”, um curso de pro- 
gramação em linguagem BASIC, composto por dez aulas, com testes de 
avaliação ao final de cada uma delas. Para os micros TK 2000 e TK 
2000 Il. * A IBM — International Business Machines — entrou com ação 
na Justiça de São Paulo contra Microcraft e Sacco Computer Store. À 
primeira foi acusada de ter copiado o sistema operacional BIOS, de pro- 
priedade da empresa norte-americana, em seu equipamento Craft XT, e 
a segunda por comercializar o micro em questão. A Microcraft argumen- 
ta que o equipamento havia sido enviado à Sacco para testes e a loja 
afirma que desconhecia o fato de o micro estar equipado com o BIOS. + 
A Prológica conta agora com um departamento especial para atendi- 
mento aos usuários dos sistemas. Trata-se do DSAT — Departamento 
de Software Aplicativo/Treinamento de Sistemas, onde 32 técnicos de 
nível superior estão à disposição do cliente. O telefone do DSAT é 
(011) 531-8822. Se a dúvida for relacionada a suporte, os ramais 234 
e 236 estão à disposição. Se forem questões sobre treinamento, os ra- 
mais são 269 e 295. + A LIVROTEC — Livraria Especializada em Li- 
vros Técnicos — acaba de ser inaugurada em Macapá, capital do estado 
de Amapá. A livraria pretende suprir as crescentes necessidades da rede 
de ensino e profissionais liberais e fica na Avenida Ana Nery, 192 — 
Macapá/Amapá. 
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PEÇAS ORIGINAIS 
NUNCA 
PREGAM PEÇAS 


No momento em que for necessária a expansão de seu AP Il ou T!. Unitron ou ainda a 
reposição de algum dos componentes, verifique cuidadosamente se as peças são originais. 
Fazendo isso você ou sua empresa estarão lucrando mais, com uma série de vantagens. 

A primeira delas está na À dada que a fábrica oferece para conjuntos formados com 
acessórios originais Unitron. Outra vantagem está na alta qualidade de uma peça ou acessório 
original; você ou sua empresa contam com a assistência técnica sempre presente nos 
momentos necessários, além disso a expansão do seu Unitron será sempre assistida 
por técnicos especializados. 


Cuide do seu patrimônio. Afinal peças originais nunca pregam peças. 








E Graph+: + 16K, + 32K, 80 colunas: 
Interface controladora para Interface paralela para im- + 64Ke + 128K: Módulo com microprocessa- — Módulo para mudança do pa- 
até duas unidades de disco  pressora com funções gráfi-  Expansões de Memória RAM — dor Z-80 adicional, permitindo drão de vídeo para 80 colu- 
flexível de 5 1/4”. cas e comandos próprios pa- coma possibilidade de simu- utilização de Sistema Opera- nas x 24 linhas. 

ra as impressoras nacionais. lação de “disk-drive” de alta cional CP/M. 





velocidade (pseudo-disco). 


Outras expansões Unitron: Interface para comunicações, RS-232C - Memória Buffer adicional 
para impressora - unidades de disco “SLIM” de 5-1/4 ou 8, impressoras de 80 a 125 CPS, 
módulo de cores PAL-M ou modulador de RF para conexão a TV, - interface GP-IB para controle 

de instrumentação, - cartão com memórias EPROM para inserção de “programas residentes”. 


unicon 
Computadores 


CAIXA POSTAL 14127 - SÃO PAULO - SP 
TELEX (011) 32003 UEIC BR 





Tem hora que precisa ser micro. 





Se que tem macro vantagens. Tem hora que precisa ser macro. 


feito quase artezanalmente, portanto testado 


um a um. Conclusão: Seja para você ou para sua empresa, 
E isso é uma macro qualidade. micro ou macro, faça como a Rede Globo, a Rede 
Como é feito com componentes de alta qualidade, Bandeirantes ou a Control que têm se utilizado do 
dentro dos melhores padrões de Engenharia, a Elppa Il Plus em suas necessidades empresariais ou 
confiabilidade do Elppa |l Plus é macro. como os funcionários do Bamerindus para suas 
O custo de manutenção é micro" o único com um ano atividades profissionais e de lazer 


de garantia - macro qualidade com macro garantia. Faça como tantos outros, que estão aproveitando as 





Já com o preço acontece uma coisa interessante, CIDDO IT vantagens de um micro & 

deveria ser macro, mas quando você verifica o custo = que sabe ser macro na ta 

do uma configuração vê que é mioro. o (q) PJPXa) JE hora certa Macro o. 
assistência técnica é macro - direta do fabricante E gs rr 

ou através de seus credenciados. RR” 2/0. Escolha o Elppa Il Plus |1 ano inte 

Ele é um Apple? compatível e dispõe de vasta gama a macro escolha. 


de expansões e periféricos à sua disposição - O M 1,4 Z 

CONTROLADOR DE DRIVE, CPIM, PAL-M, BO micro macro. VS 7775 

COLUNAS, SOFTSWITCH, 16K, 64K, 128K, GRAPH +, E 

SUPER SERIAL CARD, SINTETIZADOR DE VOZ, Fábrica: Rua Aimbere nº 931 - S.P. Tel. 864.0979 - 872 2134 

MONITOR Ill, etc... - macro vantagem. Show Room: Av. Sumaré nº 1.744- S.P. Tel. 872.4788 
« São Paulo - Audio 282-3377 - ADP System 227-4433 - Bruno Blois 223-7011 - BMK 62-9120 - Europlan 256-9188 - Victor Show Room 872-4788 e Rio de Janeiro 
- CML 285-6397 - Eleceeme 201-3792 - Formed 266-4722 - Sistema 253-0645 - SC Sistemas 232-8304 e Belo Horizonte - Spress 225-8988 « Porto Alegre - Aplitec 
24-0465 - DB Computadores 22-5136 - Embramic 41-9760 e Vitória - Metaldata 225-4700 - Soft Center 223-5147 e Brasília - Compushow 273-2128 « Curitiba 
- Video e Audio 234-0888 e Londrina - Set In 23-6183 «e Recife - NC Sistemas 228-0160 — Tecromic 325-3363 e Florianópolis - Micro Home 23-2283 e São José 

do Rio Preto - Teledata 33-2714 « Fortaleza - Systematic 244-4746 
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Cobra apresentará supermini 


Procurar utilizar terceiros, prin- 
cipalmente as Universidades, em 
seus projetos, para manter sua 
vantagem tecnológica em relação 
às outras empresas. Esta é uma 
das estratégias da Cobra, que com- 
pleta 11 anos e, segundo seu Pre- 
sidente Fernando da Costa Aze- 
vedo, ainda tem muito a realizar 
enquanto empresa estatal. Desbra- 
var novos campos, por exemplo. E 
justamente um ano após seu últi- 
mo lançamento, o Cobra-540, a 
empresa prepara-se para apresen- 
tar ao público na V Feira de In- 
formática, em setembro, o seu su- 
permini, com tecnologia da norte- 
americana Data General. 

“Pesquisamos o mercado”, diz 
Jorge Ferreira da Silva, Diretor de 
Marketing, “e a tecnologia da Da- 
ta General nos pareceu mais ade- 
quada por ser a mais recente (os 
modelos Eclipse MV/4000 e MV/ 
8000 Il, de 32 bits, nos quais irá 
se basear a linha 1000 da Cobra, 


foram lançados em 82 e 83 res- 
pectivamente). Isto nos garante 
produtos com maior horizonte de 
tempo. Por outro lado, esta é a 
tecnologia mais avançada para 
aplicações comerciais, cerca de 
95% do mercado brasileiro em ter- 
mos de volume de dinheiro”. 

Sobre um possível atraso da 
Cobra em relação à sua concorren- 
te Elebra Computadores, bem 
mais adiantada em seu projeto de 
supermini baseado no Vax750, de 
tecnologia da Digital Equipament 
Corporation, Ferreira coloca que 
a Cobra já possui toda uma infra- 
estrutura, “e não está montando 
uma indústria para esta produ- 
ção”. Segundo ele, estão sendo 
concentrados esforços para iniciar 
as entregas em outubro. 

Os superminis da Cobra não 
estão vinculados, por contrato, a 
periféricos da Data General. Os 
sistemas, com preço unitário mé- 
dio de 60 mil ORTN, poderão 


usar os monitores, drives e unida- 
des Winchester da Cobra; fitas 
magnéticas da Conpart e impres- 
soras Digilab. O software da Data 
General, este sim, estará disponi- 
vel: SO, linguagens, software de 
comunicação e banco de dados. 

Nesses superminis residem as 
maiores expectativas da diretoria, 
no que tange ao crescimento real 
de vendas da empresa, que em 84 
foi de 16%. Após anunciar lucro 
no exercício passado, Ferreira 
prevé para 85 um crescimento de 
vendas da ordem de 46%, meta 
somente possível com a nova li- 
nha (“sem o supermini, o cresci- 
mento seria de 10%"). 

Em função do alto custo dos 
equipamentos, para viabilizar eco- 
nomicamente o projeto da linha 
1000, o esquema de comerciali- 
zação da Cobra precisará de uma 
maior flexibilidade. Por isto, have- 
rá um deslanche agressivo nas ope- 
rações de aluguel. 





A Apoio — Serviços e Sistemas de Informática 
está completando quinze anos. O grupo, cujo ge- 
rente geral é Benito Dias Paret, foi fundado em 
1970 como bureau de serviços, mas ao longo destes 
anos de atuação no Rio de Janeiro, partiu para a di- 
versificação de suas atividades. Criou, então, a 
Apoio Microinformática, uma system house que 
oferece soluções completas para os seus clientes 
como sistemas aplicativos; fornecimento de hard- 
ware/software; consultoria e criação de sistemas de 
automação industrial ou de escritórios, além de 
montagens de interfaces e processadores para fins 





O novo S-700 


A P-ológica está lançando a 
terceira geração do seu sistema 
700. O novo equipamento é com- 
posto de 3 módulos; teclado, 
monitor de vídeo e UCP, e seu 
preço é 10% menor que a versão 
anterior. A UCP possui três mi- 
croprocessadores, dois Z80A, sen- 
do um para controle de E/S, e 
um Intel 8035, para controle do 
teclado. O novo 700 trabalha com 
discos Winchester de 5,10 ou 15 
Mbytes. O sistema operacional é 
o SO 8, compatível com CP/M 
versão 2,2. 
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especiais. 


No momento, a Apoio Microinformática é res- 
ponsável pela implantação de um projeto de infor- 
matização de diversas usinas de cana-de-açúcar do 
norte fluminense. 

Paralelo às atividades da Apoio, o grupo desen- 
volve, com a empresa Teledata, o projeto Teleche- 
que, sistema de proteção aos cheques com uma 
média de duas mil consultas diárias. A Teledata 
detém a tecnologia de consultas de cheques por 
computador e implantou no Rio, a exemplo de 
São Paulo, este sistema pioneiro. 


Preços da Computique 


A Computique São Paulo, que fica na Av. Angélica, 2578, 
anuncia os preços de lou dio pe peiróc comercializa: 


UCP Exato Pro (48Kb) .. 
UCP AP II Unitron (48Kb) 
UCP Craft | Plus (48Kb) . 
UCP PC 2001 (16 bits) .. 
UCP Craft XT (16 bits) 


Placas 


eita ba ie Po é (ot 
m ace a para im “a 
Placa CPÍM cr br sarro 


Expansão de 16Kb . ...... 


Periféricos 


Impressora Mônica ..... 
Monitor CCE 12” fósforo 


Monitor Compo 12" fósforo verde . 


Suprimentos 


Disquete 5 1/4" (FS/DD) — Verbatim 


Software 


Super-Visicalc . . 
Janela Mágica || 
Passo a Passo 
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Sinclair 
perde na 
Justiça 


Teve fim o primeiro litígio na 
área de informática no Brasil, que 
envolveu as empresas Sinclair e 
Microdigital. A Sinclair (inglesa) 
moveu uma ação contra a fabri- 
cante nacional dos micros TKs, 
alegando que esta última havia co- 
piado o circuito elétrico, teclado 
e o software básico do micro ZX- 
81, que teria dado origem ao TK- 
82, hoje fora de linha, mas que na 
época era o único micro fabricado 
pela Microdigital. O processo co- 
meçou em abril de 1982, com 
uma busca e apreensão cujo laudo 
determinou ter realmente havido 
cópia. Na contestação da Micro- 
digital, foi pedida nova perícia 
sob alegação de que o laudo era 
falso e as conclusões estavam er- 
radas. 

A nova perícia concluiu que o 
software básico é parte integrante 
da máquina, ou seja, compõe o 
hardware do equipamento. Quan- 
to aos teclados, o perito afirmou 
que teclados semelhantes ao da 
autora já existiam na época, em 
grande número. Com relação à 
memória ROM a conclusão do pe- 
rito dizia que as combinações na 
memória ROM são finitas e que o 
conteúdo da ROM do aparelho 
da ré não é idêntico ao da autora. 

Segundo o advogado da Micro- 
digital, Georges Fischer, a Sinclair 
na época tinha interesse em entrar 
no mercado brasileiro, o que fez 
com que a empresa ingressasse 
numa aventura judicial “baseada 
inclusive em falsos documentos”. 
O juiz Francisco Gambardelle aca- 
tou o laudo da segunda perícia e 
determinou que a Sinclair pague 
os custos processuais, além de ho- 
norários dos advogados e dos pe- 
ritos. 


CONIN se reúne 


O Conselho Nacional de Infor- 
mática e Automação Industrial 
(CONIN), composto de 24 mem- 
bros sendo 16 Ministros de Esta- 
do, realiza, ainda este mês, a sua 
segunda reunião executiva. 

A primeira reunião, em maio, 
foi dirigida pelo Presidente da Re- 
pública José Sarney e teve como 
uma das principais resoluções a 
suspensão dos incentivos fiscais e 
facilidades de importação conce- 
didos à empresas de informática 
localizadas na área da Zona Fran- 
ca de Manaus, de acordo com a 
Lei de Informática que estabelece 
incentivos iguais para as indústrias, 
independentemente da localização 
geográfica. 





(continua na pág. 70) 








A tradução pode não ser a melhor alternativa, mas algumas regras podem 
ajudá-lo bastante na conversão de seus programas entre os diversos... 








Dialetos BASIC 





Maria Sylvia Marques Abaurre 


grande maioria dos microcom- 
putadores pessoais utiliza a 
linguagem BASIC. O nosso 
principal problema é a existên- 
cia de diferentes dialetos variantes do 
BASIC original, sendo um para cada fa- 
milia de microcomputadores (TRS-80, 
Apple e Sinclair, as mais conhecidas no 
Brasil). Desta forma, um programa es- 
crito seguindo o dialeto Apple fica pra- 
ticamente inutilizável, a menos que se- 
jam feitas algumas modificações, num 
computador TRS-80 e vice-versa. 

A tradução consistiria na adaptação 
de um programa escrito em um dialeto 
para outro diferente, desde que e 
tadas certas limitações necessárias. 
tradução é uma tarefa um tanto árdua e, 
por vezes, O programa traduzido é qua- 
se que inteiramente diverso do original. 
Por conseguinte, é um bom passo para 
quem se inicia na programação de com- 
putadores porque dá uma idéia globali- 
zada de como funcionam os comandos e 
instruções da linguagem BASIC nas di- 
ferentes máquinas. 

As primeiras tentativas de tradução 
funcionam, em sua maioria, na base de 
tentativas/erros e tentativas/acertos 
como um grande quebra-cabeças, que 
nem por isso é impossível de ser montado. 

Muitos programadores puristas argu- 
mentam que melhor seria não traduzir- 
mos programas, mas sim criarmos novos. 
Em parte, concordo com esta alternati- 
va porque não creio que a tradução seja 
um fim em si mesma, mas um começo 
para um bom programador. Assim, ao 
nos entregarmos às traduções, começa- 
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mos a lidar com o programa como se 
fosse algo dinâmico, modificando sub-ro- 
tinas, alterando partes, inserindo fun- 
ções e retirando outras consideradas su- 
pérfluas. A partir daí, a confecção de 
programas próprios é quase que imedia- 
ta. 


PRÉ-REQUISITOS 
PARA A TRADUÇÃO 


Quantidade de memória disponível — Es- 
te é o principal item que se deve ter em 
mente antes de começar qualquer tipo 
de tradução. Seu computador deve dis- 
por da quantidade de memória que a 
execução do programa exige. A tradu- 
ção de um programa que consome 32 
Kb para utilização num Sinclair cuja ca- 
pacidade não ultrapassa 16 Kb é comple- 
tamente inútil. 

Um conhecimento geral da linguagem 
BASIC — Adquirido principalmente 
através de cursos, da leitura de livros e 
revistas especializadas e da análise de di- 
ferentes programas em dialetos diversos. 
Bom senso — Suficiente para não adap- 
tar, por exemplo, um programa musical 
como os existentes para Apple e Com- 
modore 64 para um Sinclair, que conta 
com reduzidos recursos sonoros. 

Uma tabela de conversão — Para reco- 
nhecer as diferentes funções dos coman- 
dos e seus equivalentes em diferentes 
sintaxes. Uma tabela com a reunião dos 
comandos e instruções mais conhecidas 
e seus equivalentes é apresentada neste 
artigo. 


BARREIRAS À TRADUÇÃO 


Programas em linguagem de máquina — 
Para se fazer uma tradução neste nível, 
teríamos que estar de posse dos manuais 
e livros técnicos de cada um dos micros 
e, ainda assim, sermos programadores 
bastante experientes, considerando a di- 
ferença existente entre as máquinas. 
Peeks e Pokes — Tais traduções só serão 
possíveis se você tiver os respectivos ma- 
nuais dos diferentes micros, a não ser 
que suas funções venham explícitas nos 
respectivos artigos publicados, que elas 
sejam dispensáveis ao seu programa ou 
que você conheça os equivalentes para 
seu micro. 

Exemplo: POKE 53281,1:POKE 
53280,0 — mudança de cor das bordas 
e do fundo da tela do Commodore 64. 
Ora, caso seu computador não seja colo- 
rido, você pode simplesmente eliminar 
esta linha sem qualquer prejuízo à exe- 
cução do programa, Se seu micro for co- 
lorido, você poderá usar seu próprio có- 
digo de cores. 


FORMATAÇÃO DA TELA 


O número de linhas e colunas nos di- 
versos computadores é diferente e você 
terá que fazer um rearranjo na posição 
que as palavras, números e/ou desenhos 
ocuparão na tela, de acordo com o pro- 
grama. Para isto, é muito útil o uso de 
tabelas como as que você vai receber de 
brinde neste artigo. 

Vamos agora examinar o tipo de sin- 


taxe usada nas diversas famílas, quando a 
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JOGOS PARA APPLE Il — Cr$ 50000 
F = pode ser gravado em fita K7 

J = uso obrigatório de joystick 

64 = requer 64K de RAM 


Sabotage (F) — evite os paraquedistas 
Apple Cider Spider — ajude a aranha 
Gama Goblins (F/)) — jogo tipo Invasores 
Taxman (F) — labirinto tipo Pac Man 
Taxman Il — nova versão 
Night Mission — jogo tipo Pinball 
Sargon — jogo de xadrez 
Draw Poker (F) — jogo de poker 
Blackjack (F) — jogo de 21 (cartas) 
Checkers (F) — jogo de damas 
Fast Gammon (F) — jogo de gamão 
Othello (F) — jogo de tabuleiro 
Frogger (F) — salve o sapo 
Donkey Kong — Mário contra o gorila 
Lode Runner — peque os tesouros 
Talon — você é um cavaleiro voador 
Olympic Decatlon — jogos olímpicos 
Space Raiders (F) — defenda a galaxia 
Norad (F) — defenda-se dos Russos 
Crossfire (F) — fogo cruzado, um perigo! 
Bugg Attack (F) — jogo tipo Centopeia 
Gorgon (F) — jogo tpo Defender 
The Eliminator (F) — combate espacial 
Night Crawler (F) — enfrente as centopeias 
Space Eggs (F/)) — caçar ovos espaciais 
Autobahn (F) — corrida de carros 
Alien Typhoon (F) — jogo tipo invasores 
The Asteroid Field (F) — tipo Asteroides 
Buzzard Bait (F) — guerra contra urubus 
Ceiling Zero (F/]) — ataque espacial 
Hard Hat Mack — perigos na construção 
Head On (F) — jogo de corrida 
Choplifter (F/)) — resgate com helicóptero 
Sea Dragon — pilote o submarino 
Spy'Ss Demise (F) — jogo de agente secreto 
Star Blazer (F) — combate aéreo 
Viper (F) — alimente a cobra 
Wave Navy — combate no mar com aviões 
Cavern Creatures — penetre na caverna 
Moon Patrol (F) — patrulha lunar 
Ms. Pac Man (F) — a namorada do Pac Man 
Mario Bros (F) — Mário contra o gorila 
Buck Rogers — pilote uma nave em "Doom 
Pitfall Il — aventuras nas cavernas perdidas 
Quest for Tires — ação na pré-história 
Castle Wolfenstein — engane os nazistas 
Beyond Castle Wolfenstein — mate Hitler 
Aztec — decifre a pirâmide azteca 
Stellar 7 — combate no espaço em 3D 
Ribbit (F) — jogo tipo Frogger 

Buny — combata as pragas 
Microbe — aventura no corpo humano. 
Serpentine — combate entre serpentes 
Alien Ambush (F/J) — jogo tipo Arcade 
Out Post (F) — defenda a estação espacial 
Defender (F/J) — detender original 
Dog Fight ll (F) — confronto de jatos 
Star Trek — Jornada nas Estrelas 
Space War — guerra espacial 
Guardian — defenda-se em um labirinto 
Jellyfish — pilote um submarino 
Swashbuckler (F) — duelo de espadachins 
Swasbuckler Il — nova versão 
Temple Apsai — aventura no templo 
Flight Simulator (F) — simulador de vôo 





Phantoms Five (1) — pilote um caça 

One on One ()) — basquete com 2 jogadores 
Lemonade — divirta-se fabricando limonada 
Soccer (J) — jogo de futebol 

Death Star (J) — combate espacial 

Pulsar || — combate espacial 

Spare Change — poupe para subir na vida 


JOGOS PARA APPLE Il — Cr$ 100000 


Gunball — opere uma incrivel fábrica de chicletes 

Karateka — perfeita simulação de karate. Enfrente varios 
adversários e liberte a princesa do Shogun. 

Conan — localize e destrua Volta em várias fases e com 
diferentes obstáculos. Aventura gráfica baseada no filme 

(2 faces de disco), 

Ghostbusters (J) — monte uma empresa de caça aos 
fantasmas e comece sua aventura. Baseado no filme (toca 

o tema musical) 

Summer Games (64) — 8 modalidades completas de 
atletismo dos emocionantes jogos olímpicos de verão. Escolha 
O pais e ouça seu hino sempre que subir ao podium (2 faces 
de disco), 

SPY vs SPY — divertida ação de espião contra espião, baseada 
nos famosos personagens da revista MAD. 

Droll — fantástica perseguição com várias fases Gráficos 
Incríveis e ação rápida 

Sky Fox (J/64) — super simulador de vôo com incríveis 
situações de combate em vários níveis. Gráficos sof.sticados. 
Mask of the Sun — aventura gráfica. No México, você deve 
achar os tesouros perdidos de uma antiga civilização. 
Empolgante desafio (2 faces de disco). 

Kabul Spy — thriler de espionagem tendo o Afeganistão como 
cenário. Envolva-se nesta trama e divirta-se (2 faces de disco. 
Dark Crystal — aventura gráfica baseada no filme “O Cristal 
Encantado”, Ache o fragmento do cristal, passando por 
diferentes cenários e enfrentando os obstáculos de um mundo 
onde reinam a magia e o perigo (4 faces de disco) 


UTILITÁRIOS/APLICATIVOS PARA APPLE Il — 
Cr$ 150.000 


Visicalc — planilha de cálculos 
Visiplot/Visitrend — gerador de gráticos 
Visidex — organizador de atividades 

Visifile — gerador de banco de dados 
Visichedule — análise financeira PERTICPM 
Visiterm — utilitário de comunicação 

Apple LOGO — compilador 

Apple FORTRAN — compilador 

GraFORTH — compilador 

Locksmith 5.0/F — utilitário de cópia 
Nibbles Away II/C3 — utilitário de cópia 

The Graphics Magicians — animador gráfico 
The Graphics Solution — editor de gráficos 
Print Shop — gerador de impressos gráficos 


— Cr$ 200.000 — 
Apple PASCAL — compilador 
Multiplan — planilha de cálculo 2º «geração 


JOGOS PARA TRS-80 Ill — Cr$ 50.000 


Flight Simulator — simulador de vôo 
Olympic Decatlon — jogos olimpicos 
Hoppy — salve o sapo 


Armored Patrol — patrulha de tanques 
Asteroid — destrua os asteróides 

Lunar Lander — pouse nas crateras da Lua 
Alien Defense — proteja-se dos invasores 
Supernova — ação no espaço 

Meteor Mission — caçada espacial 
Outhouse — proteja o seu banheiro 
Robot Attack — destrua os robôs 

Sea Dragon — pilote um submarino 
Missile Atack — defenda sua cidade 

The Eliminator — enfrente o gorila 

Duel Droid — lute espadas com o robô 
Tunel Vision — escape do labirinto 30 
Patrol — elimine à frota inimiga 
Scarfman — jogo tipo Pac Man 

Cavern — escape vivo da caverna 
Penetrator — aprotunde-se nas cavernas 
Stelar Scort — defenda-se da frota inimiga 
Assault — fuja dos ágeis inimigos 
Demon Seed — acabe com os enormes pássaros 
Cosmic Fighter — jogo tipo Invasores 
Panik — escape dos robôs 

Pinball — tipo fliperama 

Crazy Painter — pinte a tela, se puder! 
Chicken — ajude a galinha 

Galaxy Invasion — tipo Invasores 

Sargon — jogo de xadrez 

Zork | — super aventura 

Spook House — aventura grafica 

Toxic Dumpsite — aventura grafica 

Assilo — aventura gráfica 

Adventur — 4 aventuras diferentes 
FucFuc — programa pronogrático 








UTILITÁRIOS/APLICATIVOS PARA TRS-B0 Ill 
— Cr$ 150.000 — 


Creator — gerador de programas BASIC 
Visicalc — planilha de cálculos 
Bascom — compilador basic 

Seripsit — processador de textos 
Multcopy — coprador de programas 


— Cr$ 200000 — 


Clone Ill — coprador rápido de disco 
ACCEL 3/4 — compilador basic (fitaidisco) 


— 250000 — 


NEWDOS/80 2.0 — sistema operacional 
DOSPLUS 35 — sistema operacional 
LDOS 5.1.3 — sistema operacional 

Super Utility 3.2 — super utilitário 
Arranger Il — arquivo de diretórios 
Profile lll+ — gerador de banco de dados 
SuperSCRIPSIT — processador de textos 
ZEUS — super editor assembler 
DisnDATA — super disassembler 


— Cr$ 300000 — 


Producer — gerador de programas 
Super Utility — super utilitário 
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SIM. Desejo receber os seguintes programas pelo (s) qual (is) pagarei a quantia de Cr$ 
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NOME: 





END.: 





CIDADE: UF: 








CEP: 
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Tabela 





se deseja imprimir algo em um determi- 
nado local da tela. 


A família Sinclair usa principalmente 
a instrução print at e segue a fórmula ge- 
ral PRINT AT L, C;,onde L significa li- 
nha e € coluna (esta convenção será usa- 
da até o fim deste artigo). Veja a tabela 
3: 


Para traduzirmos este comando para 
um micro TRS-80, devemos procurar o 
número correspondente ao ponto de in- 
terseção entre a linha e a coluna na ta- 
bela A e aplicá-lo na fórmula geral PRINT 
é — , logo após o símbolo « 


Exemplo: Sinclair TRS-80 


PRINT AT 2,7; PRINTOI42, 


onde 142 é o número encontrado na in- 
terseção entre a linha 2 e a coluna 7, 
quando consultamos a tabela A. 


Quando quisermos fazer a mesma tra- 
dução do comando acima para um Apple, 
devemos usar a fórmula geral H-TAB 
C+1:V-TAB L+1. Assim, o PRINT AT 
2,7;e o PRINT 2142 do TRS-80 se tor- 
nariam H-TAB 8:V-TAB 3:PRINT, ao 
usarmos um Apple. 


Ao trabalharmos com um Commodo- 
re 64 ou com um VIC-20, poderíamos 
usar a seguinte fórmula geral: PRINT 
TAB(C)“[Q] — tantas vezes quantas fo- 
rem o número de linhas...”. No entan- 
to, esta fórmula só poderá ser usada 
quando o número de linhas for expres- 
so em algarismos absolutos. Neste caso, 
[Dlrepresenta a tecka CRSR 4 . Então, o 
PRINT AT 2,7; (Sinclair) seria conver- 
tido em PRINT TAB(7) “[0I0)..”, onde 
a tecla CRSR | seria pressionada duas 
vezes no interior das aspas antes da men- 
sagem a ser printada, pois o número de 
linhas é igual a 2. 


Quando a tabulação é feita usando-se 
expressões numéricas, a tradução poderá 
ser feita através de um pequeno loop 
apresentado em seguida e cuja sintaxe se 
adapta a quase todas as famílias de mi- 
crocomputadores. 
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FOR 1=1 TO L:PRINT:NEXT:PRINT 
TAB(C) 


Neste caso, um PRINT AT J+K,X-Z; 
de um Sinclair se tornaria FOR 1 = 1 TO 
J+K:PRINT:NEXT:PRINT TAB(X-Z) 
para as outras famílias de microcompu- 
tadores (nos microcomputadores de ló- 
gica Sinclair devemos utilizar apenas 
uma instrução por linha). 


Encerrando estas observações sobre 
tabulação e formatação de telas, convém 
lembrar que praticamente todos os com - 
putadores aceitam a instrução PRINT 
TAB(C), para locarmos somente a colu- 
na, e a instrução PRINT, para saltarmos 
uma linha em branco. 


Para facilitar a tradução como um 
todo, sugiro que você tente fazer um 
fluxograma do programa a ser traduzi- 
do, para que possa seguir a linha de ra- 
ciocínio do programador. A repetição 
deste artifício vai auxiliá-lo bastante no 
desenvolvimento de traduções ou em 
suas futuras programações. 


Este artigo foi escrito a partir de pe- 
quenas observações e experiências acu- 
muladas em cinco meses lidando com 
um mesmo problema: o de tentar ade- 
quar ao meu Commodore 64, programas 
para computadores Sinclair, Apple e 
TRS-80. Espero que ele possa ser útil a 
um grande número de pessoas, já que 
grande parte dos programas publicados 
em revistas brasileiras são escritos nes- 
ses três dialetos, 

& 





Maria Sylvia Marques Abaurre é bióloga, pos- 
suí cursos de linguagem BASIC e Cobol e atual- 
mente utiliza um Commodore 64. 





"MIKROS” 


* Microcomputadores Pessoais 
e Profissionais, Software, Suprimentos 
e Cursos. 

* Financiamento em até 18 meses sem 
entrada e os preços mais baixos do 
mercado. 

* Atendimento perfeito, profissionais 
treinados e habilitados para dar a você 
a certeza de um bom Investimento. 


EQUIPAMENTOS 


Micros das linhas: TRS-80 e Apple e 
IBM e Sinclair e TR$-80 Color 


Impressoras * Videos * Interfaces * Etc. 


SUPRIMENTOS 
Formulário Contínuo * Disquetes * 
Fitas * Mesas * Etiquetas * Etc, 


SOFTWARE 
Nacionais e Importados mais 
de 2.000 programas e 
jogos de todas as linhas. 
CURSOS 
Basic * Basic Avançado e DOS. 
Av. Ataufo de Paiva, 566 
sobreloja 211 e 202 


Rio de Janeiro - R.J. 
Teis.: (021) 239-2798 e 511-0599 








274-8845 


Agora em PABX 


Fita Impressora Nacional ou Importada 
Ligue 274-8845 

Formulário Continuo 1, 2 ou 3 vias 
Ligue 27, 

Aquele Arquivo para diskettes 5. 1/4" ou 8” 
Ligue 274-8845 


Pastas para Listagens 80 e 132 colunas 
iii Ligue 274-8845 


48845 


Diskettes 5.1/4" ou 8" (5 1-8 7) 


Polietileno 
PO PO o 


Etiquetas Adesivas em Formulário Conti 
Ligue 27) 


Nós temos tudo isso, e muito mais... 
* Pronta Entrega 

* Qualquer Quantidade 

* Garantia de Qualidade 


Suprimento 


MATERIAIS PARA COMPUTADORES 


R. VISCONDE DE PIRAJA, 550/2022 — 
274-8845 — IPANEMA — RIO 





DIALETOS BASIC 


Tabela com comandos, instruções e equivalentes 


a E 63/20 ema DD SINCLAIR | 64/20 | SIGNIFICADO 














na 
na 2 


MLIN X,Y AT 
A 


MPLOT XY 
MPLOP X1,v1 
HPLOF X2,Y2 


P.. TEN 
GOTO... 


mine 


muT 
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DIM Ai) 
[DIM AS(N) 


à 


à 





tem 


RUN/STOR 
(tecla) 


USRAN) 


cia 


À tem 





se 
“romer 


DATA 
abro 
Der es 
Al) mexp 


nº da Linha 
RETURN, LIST 


DIM A(N) 
DIM AS(N) 


À tem 


À tem 











ESTAÇÃO automitica à par 
tir da linha de nº X, de Y 
em. 

Paralisa qualquer tipo de 
execução, 

Leva o programa para a sub 
rotina especificada com 
Linguagem de mequina. 

Faz todos os arrays muméri 
cos e varíáveisaO e os 
arrays stringses *, 


Coloca 6 cursor no extremo 
paro pao 
tola. 


Carrega um programa na me 
mória do cassete. 


Compara o programa do cas- 
sete com o da RAM. 


Coloca o cursor no extremo 
superior da tela. 


Fornece cor para os próxi- 
ros símbolos. 


Copia a tela mma impres- 
sora. 


Prossegue com à execução 

do programa paralízado por 
stop. 

Grava em cassete o progra- 
ma da RAM, 

Define constantes a serem 
lidas por READ. 


Define um função qualquer 
4 exprexpressão) . 
Deleta as Linhas de A e B. 
Dimensicna uma matriz. 


Desenha no ponto X,Y a 
form especificada por A. 

admite como inteiras todas 
as variáveis cujas inici- 

ais estejam entre A e C, £ 
ou ye 


As variáveis cujas inici- 
ais são Z ou Y, ou estão 
entre A e C, são definidas 
como de precisão simples. 
O mesmo para variáveis de 
precisão dupla. 

O mesmo para as variáveis 
strings. 

Para se inserir, deletar 
ou substituir caracteres 
na Linha À do program. 
Fim de programa. 
Alternativa negativa para 
desvio no emprego do coman 
do tp. 

Aponta o nº da Linha onde 
há erro. 

Mostra o código do erro 
cometido. 

Simula um erro de acordo 
com o cúdigo N. 

Emcuta mais rapidamente 
o programa, 

Mostra os próximos caracte 
res da tela como “piscan- 
tes”. 

Bescuta O loop entre 06 
limites com acréscimo de 
x. 


Retorna no interpretador 
BASIC. 


E 


Desvia o programa para a 
subrotina da Linha N. 
Desvia o programa para a 
Linha N. 

Recebe ou lã um comando de 
cada vez de um arquivo. 


Liga a baixa resolução. 
Cor para os sínbolos do 
alta resolução. (n de 0 à 
n. 

Lága à alta resolução 
(pag. 1). Idem (pág. 23. 
Onde X será o mais alto 
endereço para os programas 
em BASIC, 

“raça uma Linha da coluna 
Xa Y sobre a Linha A. 
“traça retas ou pontos em 
alta resolução. 


Posíciona o cursar na co 
luna N. 

Executa ou não comandos, 
dependendo ou não da afir 
mativa proposta. 

Indica que os dados de en 
trada virão do perifárico 
Ligado à n. 

1Ê dados provententes de 
algum dispositivo de entra 
da. 


Recupera dados de um arqui 
vo lem disco ou cassete) . 











tem 
READ AS Ou À 
RECALL 


AKI X2, 0.) 
REM 


TRACE 


NOTRACE 
VLIN XY AT 
N 








SB AB 
à tem 


SET (x,7) 


POINT (X,Y) 


POKE END,N 


PRINT AT XY 


PRINTO-1,X,Y 














CrRL+tecla 
9 (REV ON) 
Ger AssIr 
A$=r * THEN 
(no desta 
linha) 

LET AB, 
topeíonal) 


Apresenta caracteres em 
inverso na tecla. 

Lê um caracter no teclado, 
sem parar o programa. 


Atribui um valor à uma va 
ráúvel. 

Lista o program da RAM 
ou parto dele. 

Envia dados para a impres 
sora. 

Onde % será o endereço 
mais baixo para programas 
BASIC, 


Apaga O programa BASIC da 
RAM. 


Complementa o comando FER. 


Desliga FLASH e INVERSE. 
Retorna a tela normal. 


Desligar TRACE (ver TRACE) 
Desliga o processamento 
para à Linha N se houver 
erro. 


Dependendo de valor, des 
via O processamento para 
AB. 

Paraliza O program em 
1n/60) segundos 

Desenha um ponto em baixa 
resolução nas cocrdenadas 
Xer. 

Confere se o ponto das 
coordenadas X,Y está "Li- 
gado”. 

Altera o byte do endereço 
fornecido para o valor de- 
cima N. 

Indica que o program deve 
voltar no penúltimo GOSUB 
quando encontrar RETURN. 
átem | Enviar os dados de saída 
ao periférico de código N. 
Imprime na tela. 

Exibe 05 dados na coluna Y 
e na linha X. 


Grava os dados em cassete. 


PRINT ou 7 

PRINT (leia 

artigo) 

PRINT nº 

arq., lísta 

de variaveis 
à tem Especifica o formato dos 

dados D e E através do uma 

string CS. 

Gera números aleatórios a 

partir de N. 

LÊ os dados do comando 

DATA. 

Carrega uma tabela para o 

cassete. 

Indica que o resto da li- 

nha é para comentários do 

programdor 

Recoloca a leitura no ini- 

cio da lista de dados de 

DATA. 

Volta à primeira Linha pos 

terior ao último GOSUB exe 

cutado, 

Rotação de um tabela para 

exibição. (n entre O e 63) 

Apaga o ponto das coordena 

das XY. 

Executa O programa que 

estã na RAM, 

Restitui à tela sua cor 

normal. 

Indica o fator de multiplt 

cação para O tamanho da ta 

bola a sor exibida. 


Movimenta a tela uma posi- 
ção para a inserção de um 
nova Lina, 

Carrega um tabela no cas- 
sete, 

Velocidade no envio de 
caracteres para à tela. 
Paraliza O programa. 


Executa o programa na mada 
lidade lenta, 


Grava um matriz em casse- 
te, 

Manda O controle para um 
programa em Linguagem de 
máquina. 

Seleciona o mudo de texto. 
Fornece data e hora. 


Acarçanha à seguência de 
instruções realizadas pelo 
micro, 

Desliga o comando TRON. 


Desenha uma coluna vertical 
entre as linhas X e Y, so- 
bre a coluna N. 


Paraliza O programa até 
que certos padrões se jam 
reconhecidos. 

Desenha a forma à no ponto 
X,Y usando cor complementar 
a última usada. 
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EM-1275 
Multimodem - O modem 
profissional também 
para micro. 


A ELEBRA está lançando o MULTIMODEM 
- 0 modem que vale por três. Um equipamento profissional que 
você também poderá usar no seu micro. 

Ele opera em 300 bps, 1200 bps e 1200 bps com canal se- 
cundário de 75 bps, para que você tenha a liberdade de in- 
pa se a qualquer rede de comunicação de dados ou 
qualquer Tele-serviço. 

EM-1275 MULTIMODEM. A alta tecnologia em modem, 
multiplicada por três. Para você ter liberdade total de escolher 
a melhor maneira de se comunicar. 

Modems ELEBRA. Produtos com passado, presente e muito futuro. 





elebra é= 


Vendas: Av. Eng." Luiz Carlos Berrini, 1461, 

São Paulo - SP CEP 04571 - Fone (011)533-9977 

Telex(011)25131 

Filial Rio; Av. Rio Branco, 50 - 11. andar, CEP 20090 

Fones (021) 233-0223/233-2220/233-3977. wo 





Filiada à Abicomp 


AELEBRAS.A.-AV. RIO BRANCO,50-11.º AND.- CEP 20090- RIO DE JANEIRO - RJ EM 





[1 Solicito o envio de folheto Nome 
Empresa 


7 Solicito visita de um Representante Cargo 


Cidade Estado 








Criptoaritmética é um jogo para Sinclair, onde 
o computador codifica operações matemáticas para você, decodificar 
em um número minimo de tentativas 


Criptoaritmética 


Jorge Alberto Correia Bettencourt Soares 


ara quem gosta de números, a 

Criptoaritmética pode revelar - 

se um passatempo fascinante, 

cuja estrutura e visual lembram 
vagamente as palavras cruzadas. É segu- 
ramente um jogo inteligente, capaz de 
aguçar a atenção e desenvolver o racioci- 
nio lógico do aficionado. 

A Criptoaritmética consiste na reso- 
lução de operações aritméticas onde os 
algarismos foram substituídos por letras 
do alfabeto ou outros símbolos, o que 
leva à decifração do código utilizado ori- 
ginalmente para formular o problema. 
Cada operação considerada individual- 
mente é denominada criptograma. 

A expressão Criptoaritmética foi in- 
troduzida em 1931, no periódico belga 
Sphinx, embora tenham-se registrado 
aparições esporádicas de enigmas de 
criptoaritmética antes dessa época. Pou- 
cos anos mais tarde, em 1935, na cidade 
de Bruxelas, durante o I Congresso In- 
ternacional de Recreações Matemáticas, 
o matemático belga Pegeolet lançou os 
fundamentos da criptoaritmética tal co- 
mo é hoje conhecida. 

Este programa, para micros da linha 
Sinclair, gera testes de criptoaritmética 
que consistem de séries de operações 
(de adição, subtração, multiplicação ou 
divisão), permitindo ao operador viajar 
confortavelmente pelos domínios da 
Criptoaritmética, familiarizando-se com 
suas leis e acidentes peculiares. 

Rodando o programa aparece o menu 
que possibilita escolher o tipo de ope- 
ração aritmética: pressionando a tecla 
K serão gerados criptogramas de adição; 
teclando J teremos subtrações, e assim 
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por diante. Passados alguns instantes, 
será impresso o primeiro criptograma, 
isto é, uma operação aritmética onde os 
algarismos foram substituídos por letras 
de acordo com um código randômico. 

O objetivo agora é ir substituindo, 
uma à uma, as letras pelos algarismo cor- 
respondentes, utilizando técnicas ou mé- 
todos de criptoanálise (veja na figura 
1 a regras fundamentais da criptoanáli- 
se). 


Na seção inferior da tela do monitor 
são impressos dois tipos de mensagens. 
No canto inferior direito, aparece a 
mensagem “CRIPTOGRAMAS : n”, sen- 
do “n” o número de criptogramas já exi- 
bidos até o momento. No canto inferior 
esquerdo aparecem conjugadamente as 
mensagens “Letra?” e “Dígito”, que co- 
mandam a entrada de dados para a solu- 
ção dos criptogramas. Por exemplo, se 
tenho na tela um criptograma que pos- 
sui três letras M e quero substituí-las 
pelo algarismo 7, faço o seguinte: se a 
tela exibe a mensagem “Letra?”, pres- 
siono a tecla M. Em poucos segundos, 
será impressa a mensagem “Dígito 7” e 
então eu aciono a tecla 7. A tela sumirá, 
voltando um pouco mais tarde com a 
substituição realizada. 


Na prática é raro conseguirmos subs- 
tituir todas as letras com base na análise 
de um único criptograma. Será necessá- 
rio, portanto, comandar a impressão de 
criptogramas adicionais; cada vez que 
acionarmos a tecla NEW LINE (ou 
ENTER) será exibido mais um cripto- 
grama na tela, e o número de criptogra- 
mas impresso no canto inferior direito 


da tela será incrementado de uma uni- 
dade. O elemento de desafio do jogo 
consiste em resolver o problema gastan- 
do o menor número possível de cripto- 
gramas. 

Teclando SHIFT e Z quando está sen- 
do exibida a mensagem “Letra ?”, será 
revelado o código que o computador 
utilizou para montar o teste que está sen- 
do processado. 

Para iniciar um novo ciclo de proces- 
samento, com a geração de um novo 
teste, basta teclar SHIFT e A em resposta 
à mensagem “Letra 7”. 

Parece difícil? Mas não é, e nada me- 
lhor do que um exemplo prático para se 
compreender como a coisa funciona. 


UM TESTE SIMULADO 


Para que o leitor possa acompanhar 
do início ao fim toda a filigrana envolvi- 
da na solução de um teste de cripto- 
aritmética, utilizaremos um truque que 
consiste em substituir criptogramas gera- 
dos aleatoriamente pelo computador 
por outros que serão fornecidos pela ro- 
tina iniciada na linha 9000. Vamos lá? 

Você já carregou o programa e agora 
inicia o processamento com um RUN. 
Logo aparece o menu e você tecla K pa- 
ra induzir a geração de criptogramas de 
adição. A imagem sumirá da tela e re- 
tomará alguns segundos após com o 
primeiro criptograma aleatório impresso 
no canto superior esquerdo do vídeo. 
Agora vamos ao truque, substituindo 
este criptograma por um outro que nos 
será de maior utilidade para a compreen- 
são do programa. Para isso dê um 
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As regras fundamentais da Criptoanálise 











BASE LÓGICA / COMENTÁRIOS 





SEGA EXEMPLO TÍPICO 
ç INFERÊNCIA 
MODELO | COLUMA | LINHA 


1 0=8 ) 1 


Se PaD=p 


na col. 1, então D=g. 
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YNHP 2swe FPYYW 
WNND +HNWA -HNZHH 
SNwP Ysgr SFFN 














Figura 1 


BREAK e logo em seguida GOTO 9000. 
A imagem sumirá, voltando momentos 
após com este criptograma em substi- 
tuição ao que estava lá: 


X CAXK 
+JRKR 


RAFAF 


Para facilidade de referência, vamos 
convencionar a numeração das colunas, 
ordenando-as da direita para a esquerda. 
Assim, temos na coluna 1K +R =F;na 
coluna 2 A + K=A e assim sucessiva- 
mente. 

Na coluna 5, aplicando a regra II (ve- 
ja as regras na figura 1), descobrimos 
que R = 1. Já podemos substituir esta 
letra, teclando inicialmente R, para 
atender à solicitação da mensagem 
“Letra ?” impressa no canto inferior es- 
querdo da tela. Logo após, quando 
aparecer a mensagem “Dígito 7” tecla- 
mos 1. Após um breve período sem tela, 
teremos: 


X CAK 
+JI1IKI 
1AFAF 
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Muito bem, uma espiada na coluna 2 


sugere que se A +K = AentãoK =0 ou 
K = 9 (regra III). Mas veja na coluna 1 
que,seK =0,emvezdeK +1 =F tería- 
mos K + 1 = 1, não é mesmo? Portanto 
K = 9 com certeza, e consequentemente 
também já temos condições de decifrar 
o F na coluna 1, considerando que se 
9+1=F,então F =0e “vai um” para 
a coluna 2. Correto? 

Temos agora duas letras para substi- 
tuir: K e F. Iniciamos teclando K e logo 
em seguida 9. O monitor ficará algum 
tempo sem imagem enquanto é feita a 
substituição de todas as letras K por dí- 
gitos 9. Depois, quando aparecer nova- 
mente a mensagem “Letra ?” digitamos 
F e posteriormente O. 

O resultado visível das duas substi- 
tuições será: 


XCcaAS 
e OD RE 
1lAgASYs 


Dá para perceber que houve transpor- 
te (“vai um”) da coluna 1 para a coluna 


2, e da coluna 2 para a coluna 3. Olhan- 
» 
e 
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CRIPTOARITMÉTICA 







do agora para a coluna 3, podemos afir- 
mar que C + 1 +transporte = 10, donde 
se conclui que C = 8. Trangúilo? 

Teclando C e posteriormente 8, para 
as devidas substituições, ficamos com o 
seguinte quadro: 


x 8A 9 
+J191 
1IAgAY 


Agora estamos empacados, já que 
não há quaisquer elementos que possibi- 
litem decodificar as letras A, X e J. O 
jeito é pedir um segundo criptograma 
teclando NEW LINE (ou ENTER). A 
tela apresentará agora a seguinte confi- 
guração com a entrada do segundo cripto- 
grama: 





x 8 A 9 UAIOU 
+J 191 +9AG%X% 
1IAgAD IHKADR 


Note que no segundo criptograma 
as letras já decodificadas também foram 
devidamente substituídas. Observando a 
coluna 2 do segundo criptograma veri- 
ficamos que se 1 + O + transporte da 
coluna | = A, então A = 2. Isto nos 
permite também deduzir que na coluna 
3X=4,poisse A+A=XeA=2,en- 
tão X=4. 

Agora temos mais duas letras para 
substituir e teclamos A e 2, e, numa ou- 
tra etapa, X e 4. Feitas as substituições, 
a tela fica assim: 





4829 U21U 
+J191+927974 
12H27 1H429 


Dando uma olhada na coluna 4 do 
primeiro criptograma, podemos deduzir 
que J = 7, correto? Assim matamos o 
primeiro criptograma e podemos fazer 
mais uma substituição digitando J e 7. 
Na tela temos então: 





4829 VU 21 U 
+7191+9274 
127207 1H429Y 


Finalmente, a coluna 1 do segundo 
criptograma evidencia que U = 6. Se 
U = 6 então podemos garantir, na colu- 
na 4, que H=5. Assim liquidamos o se- 
gundo criptograma. Substituindo as 
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Figura 2 


duas últimas letras, o teste termina com 
a tela mostrando: 


4:82:09 6,216 
JIN DD DEAR 
Ra a ST 2 À 





VARIÁVEIS DO PROGRAMA 





cs(21,5) 


F$(10,1) 
aos dígitos & a 9. 


aritmética 


B$ Armazena a série de dígitos de g a 9, os quais vão sendo 
substutídos por asteriscos cada vez que é teclada uma le- 


tra do código 


H$ Armazena o símbolo teclado em resposta à mensagem “LETRA 


Ex) 


SOLUÇÕES DOS CRIPTOGRAMAS PERFEITOS 


Armazena um máximo de 21 registros. 
ponde a um número de 2 a 5 algarismos utilizado para a 
montagem das operações aritméticas (criptogramas). 
dida que prossegue a solução do teste de criptoaritmética, 
os algarismos de cada registro vão sendo substituídos por 
letras, de acordo com um código 


Armazena um código randômico de 10 letras correspondentes 
Assim, F$(1) corresponde ao f&, F$(2) 
ao 1, e assim sucessivamente 


AS Armazena O símbolo teclado para definir o tipo de operação 


Note que, na parte inferior direita da 
tela, temos a mensagem “CRIPTOGRA- 
MAS:2”, significando que gastamos dois 
criptogramas para resolver este proble- 
ma. O código que o computador utili- 
zou para formular o problema foi: 
F=0,R=1,4A=2,N=3,X=4, 


Cada registro corres 


À me- 





IS Armazena o símbolo teclado em resposta à mensagem "DIGITO 


2" 


K$ Armazena os dados necessários para simular um teste de 
- Criptoaritmética, usado para a compreensão deste artigo 


D$,E$,G$,J$ Áreas de trabalho 


A,B,C,D,E,F,G 
- gramas 


Números randômicos utilizados para montagem dos cripto- 


H Endereço de retorno em caso de tela cheia, para desloca 
mento dos criptogramas à esquerda e entrada de um novo 
criptograma no final da série 


I Endereço de retorno ao bloco de instruções PRINT que 


na tela. 


tela. 
multiplicação 


Contadores de loop 





exibe na tela uma série de criptogramas 
J Número de criptogramas que já foram exibidos na tela desde 
o início da solução do teste 


K Define quantos números (registros da string C$) estão sen 
do utilizados nos criptogramas que estão sendo exibidos 


L Define quantos números (registros da string C$) são neces 
sários para montar um criptograma. 
subtração; L=5 para multiplicação e L=7 para a divisão. 


M Define quantos números (registros da string C$) cabem na 
M=21 para adição, subtração e divisão; M=20 para a 


L=3 para adição e 


T Controla a posição do início da armazenagem de números 


(ou letras correspondentes) na string CS. 
+ quando a tela enche T é alterado para 


normal T=1, por: 


Em condição 


desviar para o final de C$ a inclusão do número de regis 
tros correspondente a um novo criptograma 


Define a linha utilizada em instruções PRINT 
Z Define a coluna utilizada em instruções PRINT 


S,X Áreas de trabalho 
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=5,U=6,]=7,C=8,K=9.0 
computador revelará este código se você 
teclar SHIFT e Z quando estiver sendo 
exibida a mensagem “Letra 2”. 

No exemplo dado anteriormente, 
conseguimos decifrar o código utilizan- 
do apenas dois criptogramas, mas isso 
foi propositadamente arranjado para 
simplificar a demonstração. Na prática, 
é preciso analisar, digamos, de cinco a 
dez criptogramas de adição para decifrar 
um código. E não é raro termos que tra- 
balhar 15 ou mais criptogramas para so- 
lucionar um teste. Isto varia de um pro- 
blema para outro e depende também do 
nível de experiência do aficionado. 

A dinâmica para solução dos testes 
de criptoaritmética segue em linhas ge- 
rais a sequência observada no exemplo 
dado anteriormente. Normalmente se 
começa desvendando as letras corres- 
pondentes ao 0,9, 1 e 5 que são os alga- 
rismos mais fáceis de se identificar, e a 
partir daí se consegue matar as letras 
restantes. A maior dificuldade está em 
decifrar as 3 ou 4 primeiras letras, já 
que a partir dessa “massa crítica”, se 
assim poderíamos chamá-la, o processo 
deslancha e progride rapidamente. 

Se você estiver errado ao fazer a 
substituição de uma letra por um dígi- 
to, o computador se recusará a executar 
a substituição, imprimindo no centro 
da tela a mensagem “SUBSTITUIÇÃO 
INCORRETA”. Também quando o pro- 
grama pede “Letra?”, se você digitar 
por engano um algarismo ou outro sím- 
bolo, ou vice-versa, se o programa pede 
“Dígito 7” e você tecla uma letra, o 
programa ignorará essa entrada inválida 
de dados, e insistirá na solicitação origi- 
nal. 

Você vai observar também que, quan- 
do a tela enche e você pede mais um 
criptograma o programa desloca à es- 
querda a série de criptogramas que es- 
tava no vídeo, introduzindo um novo 
final da série. 


CAÇA AOS CRIPTOGRAMAS 


Denominamos aqui de criptograma 
perfeito aquele que é completo em si 
mesmo, ou seja, utilizando um único 
criptograma você consegue decifrar to- 
das as letras que o formam. 

Quando se trabalha com multiplica- 
ções e divisões, a lei do acaso faz com 
que eventualmente a gente tropece em 
criptogramas perfeitos. Um exemplo 
de criptograma perfeito é o seguinte 
clássico da literatura criptoaritmética: 


SEND 


+MORE 
MONEY 
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a Inicialização 
180 a 
1000 a 1380 
2000 a 2460 
2500 a 2580 
3000 a 3070 
3500 a 3590 
4000 a 4040 
4500 a 5020 


4800 a 
4850 a 


4840 
4900 


4910 a 4980 
mas 


4990 a 
9000 a 


5020 
9080 





E aqui estão mais dois criptogramas 
perfeitos descobertos por acaso durante 
nossas investidas de fim-de-semana. 


BNA LQUJUVAR vss 
BT vss LI 
BNA VQLR 

WARY SWIS 

VNYYA RL 


Uma observação final. As regras da- 
das na figura 1 são as mais simples e 
úteis para o início dos trabalhos de 
decodificação de criptogramas. Cada 
um, posteriormente, irá completando 
seu arsenal de regras e macetes e, em 
pouco tempo, ficará surpreso com o 
sucesso alcançado. 

As soluções dos três criptogramas 
perfeitos apresentados anteriormente es- 
tão na figura 2. 

O programa, com suas variáveis e 
arquivo da tela de TV, ocupa 6.207 
bytes de memória. 


CONVENÇÕES E OBSERVAÇÕES 
(DA FIGURA 1) 


1) Em cada modelo a numeração das 
colunas faz-se da direita para a esquer- 
da. Assim, PDP constitui a coluna 1 do 


modelo 1; HNW a coluna 2 do modelo 1 


e assim por diante. 
2) Para fins didáticos, a letra D já 
foi substituída por O nos modelos 2 e É 


Também substituiu-se o F por 7 no mode- 
lo 4,e 0 N por 9 no modelo 5. 
3) Por R(32) entenda-se a letra R lo- 


ROTEIRO DO PROGRAMA 


570 Bloco para montagem das operações de adição e subtração 
Bloco para montagem das operações de multiplicação 
Bloco para montagem das operações de divisão 


Gera um código randômico de 10 letras, correspondentes 
aos dígitos 9 a 9, armazenando-o na variável F$(10,1) 


Armazena na variável C$(21,5) os números utilizados 
para montar as operações aritméticas 


Substitui todos os dígitos armazenados em C$ pelas 
letras correspondentes do código 


Armazena na variável X o número de caracteres' alfanumé- 
ricos existentes num campo de 5 posições 


Gerencia as opções de resposta às mensagens "LETRA ?" e 
“DIGITO ?" impressas no canto inferior esquerdo da tela 


Coloca mais um criptograma na tela 


Se a tela fica cheia, desloca à esquerda os criptogra- 
mas existentes, eliminando o primeiro e introduzindo um 
novo no final da série 


Revela o código utilizado para a montagem dos criptogra 


Imprime a mensagem “SUBSTITUIÇÃO INCORRETA" 


Simula um teste de criptoaritmética composto de 2 cripto 
gramas de adição, utilizado como exemplo neste artigo 






calizada na coluna 3, linha 2. 

4) Para facilitar a análise, convém 
visualizar as substrações como adições 
às avessas. Assim, a subtração do modelo 
3 pode ser transformada na adição 
SFFN + HNZOH = FPYYW. 

5) Foi utilizado um código único na 
montagem dos criptogramas dos modelos 
1a 6.0 código é: D=0;Z=1I;R=2; 
P=3;S=4,W=5;H=6;F=7,Y=8, 
N=9. 
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CRIPTOARITMÉTICA 











10 REM CRIPTOARITMETICA 
2o BRnip'ICRO SISTEMAS - JACES 
Ni 


40 DIM C$(21,5) 









SuBT 
“MULT 
1s 


TF. INKEY$= 
és LET AS=INKEYS 
90 IF AS<c>"K" AND ASc>"J" AND 
As: B' PR ada AS<>"U” THEN GOTO 70 


THEN GOTO 70 


120 LET B$='0123456789" 
130 has gar 


Er 
150 E5Sus “isoo 

“"B” THEN GOTO 1000 
A THEN GOTO 2000 


THEN LET 5=10000 

5 THEN LET 5=100000 
250 FOR N=T TO M STEP L 
260 LET A=INT (RND+5) 
270 IF A<5/10 THEN GOTO 250 
280 LET B=INT (RND+5) 
eso Te Ersadod er Goto 280 

NÍ 








Too D B>=A THEN GOT 
o Elo” 
310 IF A$ THEN LET C=A+B 
820 IF Ag="J" THEN LET C=A-B 
330 COSUB 300e 
340 NEXT N 
350 GOSUB 3500 

LET U 

THEN LET Z=-5 






Iv THEN LET Z=-6 

TO K STEP L 

400 LET Z=7+5 

410 IF N=15 THEN LET Usi2 

420 IF N=13 AND Ag="K” THEN LET 


430 IF N=13 AND Ag="J" THEN LET 


440 PRINT AT U,Z:;C$S(N) 


450 PRINT AT U+1,7-1;"+";CSIN+1 





460 IF A$S= THEN PRINT AT U+1 
sZ=1; "= 8E PM Z+4; 
470 PRINT AT Us2.Z2-1:"--—-—— 

ET D 


=C$SIN+2) 
oo 
THEN PRINT AT U+3 
THEN PRINT AT U+3 





[=] 


N=T TO M STEP L 

1060 LET EE INT (RND+1000) 

1070 IF Ac<100 THEN GOTO 1060 
1080 LET B=INT (RND+100) 

1090 IF Bc10 THEN GOTO 1080 

1100 LET Eg=STR$ EB 

1110 IF VAL Eg$(2)=0 THEN GOTO 10 


1120 LET C=VAL Eg(2) +A 
1130 LET BEuAL ES(1) 4A 


LET E=As 
1150 GOSUB 3000 
NEXT N 
1170 socue ageee 


1190 LET Sale 
1200 FOR N=1 TO k STEP L 


PARA 
PROBLEMAS 
TÉCNICOS 
USE 


A CABEÇA 


Criptoaritmética 


11 *rien LET U=12 
11 THEN LET Z=7 
1240 PRINT AT U,Z+2:C$8(N) 
1250 PRINT AT U+1 Eae CS(N+1) 
1260 PRINT AT Us42,7+4+1;"-===" 
1270 LET D$=C$(N+2) 

1280 GOSUB 4000 

1290 PRINT AT U+53,7+5-x;D$ 
1300 LET D$=C$(N+3) 
1310 COSUB 4900 
1320 PRINT AT U+4, 
1330 PRINT AT U+s 
1340 LET Dg$= CS IN+á) 
13550 
1360 








GOSUB 42000 

PRINT AT U+6,7+5-x;D$ 
1370 NEXT N 
1380 GOTO 4500 

ET eso 
220 





1 
TO M STEP L 
2060 LET A=INT (RND+1000) 


ID 0, 
2oso IF Bc11 TRE Bó78 aoso 
2100 LET E$=STR$ EB 

2110 IF VAL ÉS is) co THEN GOTO 20 





Bo 

2120 LET C=AsUAL Eg(1) 

2130 LET D=AsVAL Eg(2) 

2140 LET E=INT (AsRND) 

2150 LET F=AsB+E 

2160 LET Es=STR$ E 

ao IF F>9999 THEN LET G=VAL ES 
( 

2180 THEN LET G=VAL E 
s(1 E 

aiso 

2200 

aeio 

2220 L 

aeso 

2240 STEP L 

ezso 

azso LET U=13 

2270 LET Z=10 


E 
2280 LET D$=C$(N+5) 
2290 GOSUB 4000 





2300 PRINT AT U,2+5-X.D$;TRE Z+5 
“.NiTAB Z+7;C$S(N);AT U+3,7+4;DS 
(xi 
2810 LET D$=C$(N+42) 

320 COSUB 4000 
2330 PRINT AT U41,2+4-X;D$;TAB Z 
48; "====0" 
2340 PRINT AT U42,Z;"----- TRE 
2+7; CS (N41) 
2350 LET D$=C$(N+46) 
2360 GOSUB 4002 
2370 PRINT AT U43,2+4-X;D$( TO X 


2380 LET D$=C$(N+3) 
2390 GOSUB 4000 

2400 PRINT AT Usd,Z+5- 
2410 PRINT AT U+S,Z+41; 








To 10 
(RND+26) 





2540 IF FSTÊ) CEMAS X THEN GOTO 2 


2sso NEXT Pp 

2560 LET FS(N)=CHAS X 
2570 NEXT N 

2580 RETURN 

3000 LET C$(N)=STR$ A 
3010 LET ÉS IN+I) eStRa Ê 
3020 DM ea dah =STR$ 














Roso Tr THEN LE? És (N43) =5T 

Raso IF L>=S THEN LET Cg(N+4) =5T 
$ E 

Ha IF L=7 THEN LET C$(N+5) =STR 





3060 IF L=7 THEN LET C$(N+6) =STR 


3070 RETURN 

3500 [or N=zT TOM 
G$=C$(N) 

3s20 FOR P=i TOS 

3530 FOR R=1 TO 10 

3540 IF G$(P)=B$(R) THEN LET G$1 

PI =ES(R) 

35S0 NEXT R 

3560 NEXT P 

3570 LET CS(N)=G8 

3580 NEXT N 

3590 RETURN 

4000 LET x=0 

4010 FOR P=1 TO Ss 

goes IF DS(P) co" 


4030 NEXT P 
4040 RETURN 
sr PRINT AT 21,16; “"CRIPTOGRAMA 


isso Briur AT 21,0; “LETRA 7" 


4530 Ea InKEys=" “ THEN GOTO 4530 
45.0 Eru HS=INKEY$ 


CL 
sao IF CODE H$=118 THEN GOTO 45 


o 
4570 IF CODE H 27 THEN GOTO 60 
ad IF CODE H$=14 THEN GOTO 491 


4590 IF CODE nes 38 OR CODE H$>63 

THEN GOTO 45 

4600 PRINT AT E, O; “DIGITO 7" 

4610 IF INKEY$=""* THEN GOTO 4610 

4620 LET Ig=INKEYS 

4630 IF CODE 1$>37 OR CODE Igcas 

THEN GOTO 4610 

4640 FAST 

4650 CLS 

4660 FOR N=1 TO 10 

4670 IF F$(N)=H$ THEN GOTO 4700 

4680 NEXT N 

4650 Eudes 49s0 
Is ESA THEN GOTO 4990 

4710 For 


4720 LET cs dy 
4730 FOR BÊ 1 TO 
4740 IF J$iP) Rs. THEN LET JStP)= 


4750 LET C$(N)=U$ 

4760 NEXT P 

4770 NEXT N 

4780 LET BS(VAL I$+1)="+ 
4790 GOTO I 

4800 FAST 

4810 LET J=J+1 

4820 LET K=K+L 

4830 IF k>M THEN GOTO 4850 
4840 GOTO I 





THEN LET X=Xx+ 





EN 
5) 
e 
[=] 
" 








4570 LET CE UN) SC TReL) 

4580 NEXT N 

4890 LET id L+1 

4990 GOTO 

4510 FOR Nº1 TO 10 

4920 PRINT FgIN);“=";N-1,,,5 
4930 NEXT N 

4940 PRINT AT Bo, 8; "CONTINUA COM 


THEN GoTO 4950 





OI 
4990 PRINT AT 10,5; “SUBSTITUICAO - 
INCORRETA" 
5000 SLOUW 
5010 PAUSE 60 
sozo BOTO 4960 


Ena LE 
$="4829 7191 120206216 
Ea ciGeROERANR TUCA" 


5856 LET CSiN)=K$(N$5-4 TO N45) 
9040 NEXT N 

9050 FOR N=1 TO 10 

9060 LET FS(N) =K$(N+30) 

9070 NEXT N 

9080 GOTO 350 


PARA PROBLEMAS COM MATERIAL DE 


DESENHO — PINTURA — ENGENHARIA — PAPELARIA — ESCRITÓRIO 


MÁQUINAS P/ESCRITÓRIO E SUPRIMENTOS EM GERAL 


O BEL-BAZAR 
ELETRÔNICO 


onde você AINDA encontra preço 
e qualidade de ANTIGAMENTE! 


AV. ALMIRANTE BARROSO, 81 — Lj. “C” 
Tels.: 262-9229 — 262-9088 — 240-8410 
CASTELO — RIO DE JANEIRO 








score e remeta phra Ex. Postal 984 Osasco - SP 
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ME impressionante! 


+ 
o) , 
Quandã umyprofluto tem a Garantia Moore, quem 
está garantido É você 

















FITAS PARA - 
é IBM 1403/3203 Globus 84800 08 

Por isso, aolulllizar uma Fita Impres sora Loyal, 183214 Globus 8800] 
saiba que, por detrás de ne qualidade, Cobra 2230 Globus M-200 
perfeito equilíbrio Evlon/ [7 edi menor Burroughs 9240/3 Epson 500 
custo o io do merc: ade pesformápice de Burroughs 9246 Epson ERCOB 
regeneração invejável, estão única “BO /G ro + 
FORNECEDOR TOTAL PARA INFORMAFICA do país. SU 
São mais fle 50 Filiais de Venda da mais completa PENA RS ADO uma Polymai 
rede de Lojas de Informá: sempré perltóde você. 


LigugsnOs e conheça às Fitas Impressoras Loyal 
A Gãrabtia Moore é segurança e qualidade em 
totâlhêrmonia. 


Elebra/Prológica P720 Elebra Alice 


Loyai (À 
[E == o 





Para maiores informações, ligue: 
Na Grande São Paulo: 872:3316 
De outros locais: (011) 800-3316 


(nós pagamos seu interurbano) 
Eu desejo receber: Catálogo Õ Vendedor O Moore Formulários Ltda. 
Nome: mi mi 


COMPUTER 
E ESTATE SHOPPING 
CC a TR MOORE 





C's UNIVOS. 


DESTA REDE VOCÊ NÃO ESCAPA. 


O TEL 2608 é o único MULTI-USUÁRIO capaz de formar uma rede entre micros de 16 


e 8 bits, com até 8 estações de trabalho. A ele você liga o TEL 2605 ET, PC, XT 
e os demais PC's compatíveis. 

O TEL 2608 opera com uma unidade Winchester de 67 MB e na hora de 
expandir o seu sistema, você pode contar com o TEL 2616, que trabalha 


com duas unidades Winchester de 67 MB e 16 estações. 
Entre nesta rede, desta você não escapa. 


TEL I800A: 

e Processador Z80A 4 MHZ. 64 KB de 
RAM e 4 KB de EPROM. 

e 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

e | porta R$-422 com taxa de 800 Kbits 
p/segundo. 

* Vídeo 12” de fósforo verde. Texto e grá- 


fico dé média resolução com tela de 24x80 
caracteres e 25? linha estado /usuário. 

e Teclado destacável com numérico redu- 
zido com 11 teclas de função programá- 
veis. 


TEL 1802: 

* Processador Z80A 4 MHZ. 64 KB de 
RAM e 4 KB de EPROM. 

e 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

* | porta RS-422 com taxa de 800 Kbits 
p/seg. 

e vídeo 12” de fósforo verde. Texto e grá- 
fico de média resolução com tela de 24 x 80 
caracteres e 25º linha de estado /usuário. 
* 2 unidades de disco flexíveis 5 1/4" 48 
TPI 360 KB formatos por unidade ou na 
versão 1802D com 1 disco flexível e 1 disco 
rígido Winchester 5 1/4” de 19.14 MB. 












TEL 1806: 

* Processador Z80A 4 MHZ 64 KB de 
RAM. 

e 2 portas seriais RS-232C sincronas ou as- 
sincronas. 

e | porta paralela padrão Centronics 

* 6 portas R$-422 com taxa de 800 Kbits. 
e | unidade de disco flexível 5 1/4'' 360KB 
formatado. 

e | unidade de disco rígido Winchester 5 
1/4 ** 19.14 MB podendo ser expandido até 
38.28 MB. 











TEL 2605: 

* processador Intel 8088 4.77 MHZ. Op- 
cional mais um 8087. 

* 256 KB RAM expandivel até 640 KE 

* na versão 2605 PC, 2 unidades de disco 
flexível 5 1/4” de 360 KB formatado ou na 
versão 2605 XT com 1 disco flexívele 1 dis- 
co rígido Winchester 5 1/4" 12.75 MB. 

* | porta serial RS-232C e | porta paralela 
padrão Centronics. 

* Monitor de vídeo 12” (RGB ou vídeo 
composto) ajustável com alta resolução 
gráfica de 640 x 200 pixels. 

* Teclado destacável, numérico reduzido, 
mais 10 teclas de função programáveis. 

* S slots de expansão padrão IBM. 


CINTIA CT TITITITIAT 








TEL 2608: 

* Processador Intel 80186 8 MHZ e Z80A 
de 4MHZ. 

e SI2 KB RAM, expandivel até | MB. 

* 1 disco flexível 5 1/4” com 360 KB for- 
matado. 

* | disco rígido Winchester 5 1/4” com 67 
MB. 

* 2 portas seriais RS-232 C com taxas de 50 
a 9600 bits p/segundo. 

* | porta paralela padrão Centronics. 

* 8portas RS-422 com taxa de transmissão 
de 800 Kbits p/segundo e na versão 2616 
com 2 discos Winchester fazendo 134 MB, 
e 16 portas RS-422. 
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Av. das Américas, 4430 — grupo 304 
Tels.: (021) 325-9300 — 325-4122 — 
Telex (021) 32625 ESTL — CEP 22600 
Rio de Janeiro — RJ 

Filial Rio de Janeiro 

Av. Rio Branco, 43 18º andar — 

Tel.: (021) 233-5722 — CEP 20090 
Filial S. Paulo: Av. Brasil, 1992 

Tels.: (011) 853-6457/852-9295 

CEP 01480 — São Paulo — SP 


NAJA 800. 
ESTE NÃO RECUSA 


NANA S00 


O SUPERVERSATIL 


CARACTERÍSTICAS TÉCNICAS: 

* Utiliza até 4 drives de 5 1/4" 0u8B',em 
face dupla ou simples. 

* Winchester de 5M, 10M ou 15M Bytes. 


* 128K de memória RAM, expansível 
para mais 512K Bytes. 

* Compatibilidade em software com os 
computadores TRS-80, modelos IV, Ill, 
lel. 

* 24 linhas de 80 ou 40 colunas. 

* Alta resolução gráfica com 640 x 240 
pontos. 

e Caracteres para representação gráfica 
da linguagem APL. 


Compatível com os Sistemas 
CP/M3,0-CP/M 2.2.- NAJA/DOS - 
DOSPLUS - NEWDOS/80 - 

LDOS - MULTIDOS - 

TRSDOS6.1 - TRSDOS 1.3 


Conheça o NAJA 800, um produto 
Kemitron. Entre em contato conosco. 


GO ATA im 


Av. Contorno, 6048 - Savassi - Fone (031) 
225-0644 - Telex (031) 3074 - KEMI - BR 
Belo Horizonte, MG. 











responde 


Estou com problemas no programa FÓR- 
MULA 1, de setembro de 1983. Estou 
procedendo da seguinte forma: 

1 — Rodo o programa Monitor Assem- 
bler. 

2 — Crio a linha REM necessária. 

3 — Digito todos os números hexadeci- 
mais do bloco Assembler. 

4 — Volto ao BASIC, 

5-— Apago todas as linhas e digito o pro- 
grama da listagem BASIC. 

Ao rodar o programa, pela segunda 
vez, em um TK 85, ele apresenta erro na 
linha 1340 (memória estourou) ou per- 
gunta se desejo mudar a velocidade. Se 
pressiono qualquer tecla o programa é 
executado novamente até esse ponto. 

Gostaria de poder obter melhores es- 
clarecimentos quanto ao Assembler, 
pois posso estar cometendo erros. 
Vanderlei Miche'atto — Campinas — SP 


, MICRO SISTEMAS 


Realmente Vanderlei, você está come- 
tendo algum erro e pela sua carta fica di- 
fícil saber exatamente onde, pois o seu 
procedimento parece correto. Vamos 
então orientá-lo de forma que você mes- 
mo possa encontrar a solução: reveja 
todo o seu procedimento relendo o tex- 
to do programa. Procure por situações 
que poderiam dar margem a interpreta- 
ções erradas (como eliminar apenas as 
linhas inúteis) ou algum erro na digita- 


ção (apesar de todo cuidado eles aconte-. 


cem com muita frequência). 

Se ainda assim os problemas persisti- 
rem, procure trocar idéias com algum 
colega, para saber se ele está tendo os 
mesmos problemas. 


PERGUNTA 


Vocês poderiam me adiantar algumas in- 
formações? 

1) Como faço para PRINTAR no meio 
do vídeo, por exemplo, o nome MICRO 
SISTEMAS? (em Assembler) 

2) Como anular o comando BREAK ou 
qualquer outro? (o programa só pararia 
se desligasse o micro) 

3) Como fazer para mudar o caráter do 
cursor do TK? (tenho sua fita MICRO 
BUG e vocês se utilizam de um “ ]') 
4) Falando em MICRO BUG, por que de 
vez em quando o comando E coloca 
mais caracteres do que o necessário? 


5) Como calcular o início de uma REM 
no meio do programa? 
James Vassallo Donadelli — Jundiaí — SP 


MICRO SISTEMAS 


1) Existem diversas formas de PRIN- 
TAR algo na tela, e cada uma está asso- 
ciada a um tipo de desempenho. Dê uma 
boa olhada na matéria “Ok micro, você 
venceu” (MS nº 21) que você encontra- 
rá diversas dicas sobre esse assunto. 

2) A tecla BREAK, em operações BA- 
SIC, é praticamente impossível de ser 
desativada e o melhor meio mesmo é as- 
sumi-la como tal. Já em Assembler, a te- 
cla BREAK pode ser desativada facil- 
mente, bastando que o programa feito 
pelo usuário não a considere como uma 
“interrupção”. 

3) No modo de edição é impossível ha- 
ver uma mudança do caráter do cursor, 
porém em entrada de dados é possível 
escolher o que melhor lhe convém. Dê 
uma lida na matéria “Abrindo Espaço 
na Tela” (MS nº 24) que trata especifi- 
camente desse assunto. 

4) Devido à operação do SGM estar ajus- 
tada para valores hexadecimais. Nessa 
situação, os valores decimais devem ser 
antecedidos pelo especificador “$". 

5) Basta acrescentar ao endereço inicial 
da linha, os 2 bytes do número de li- 
nha, 2 bytes da quantidade de elemen- 
tos da linha e o byte do código da ins- 
trução. Assim, se uma linha REM co- 
meça no endereço 16509, o seu pri- 
meiro elemento disponível será 16509+ 
2+2+1 = 16514. Para achar o endereço 
inicial da linha, basta fazer uma procura 
pela linha desejada na área de memória 
onde reside o programa BASIC. Dê uma 
estudada na dica “Zerando REMs" (MS 
nº 27). 


PERGUNTA 


Os endereços 16404 e 16405 nos micros 
da linha Sinclair armazenam o último 
endereço utilizado pelo programa da 
memória. Porém, aa ligar o micro, usan- 
do-se o comando PRINT PEEK 16404+ 
256*16405-16509, obtemos como re- 
sultado 794 (sem programas ou variáveis 
na memória). Sabendo-se que as variá- 
veis do sistema não ocupam nem 150 
bytes de memória, como posso separar 
programas de 1,2 ou 16K? 

Cláudio C. Araújo — Salvador — BA 


Realmente o comando PRINT PEER 
16404+256*PEEK 16405- 16509 dá a 
quantidade de bytes de um programa 
em BASIC, incluindo as variáveis e o 


arquivo de imagem. Porém, se o equipa- 
mento tiver 1 ou 2K o resultado não 
será 796, e sim 26. Tal fato ocorre por- 
que em micros com menos de 3,5K de 
RAM o arquivo de imagem fica com for- 
mato reduzido. Veja a matéria “Peque- 
nas Memórias, Grandes Economias”, MS 
nº 22. 


PERGUNTA 


Quando se está operando em Assembly, 
há algum contato com o sistema opera- 
cional, ou o microprocessador só se con- 
centra no programa em questão? O que 
me levou a levantar a seguinte questão 
foi o fato de que certas variáveis do sis- 
tema (como o contador de tempo) ou 
certo parâmetro de tela (16424) estarem 
sendo frequentemente atualizados. O 
microprocessador tem capacidade para 
fazer isso sozinho, ou necessita de roti- 
nas para tal? Existe algum FLAG que 
indica ao processador em que modo 
operar? Ele constrói a imagem sozinho, 
ou recorre ao sistema operacional para 
gerar a tela em SLOW? 

Clifford M. Oliveira — Curitiba — PR 


MICRO SISTEMAS 


O ZB0 é um microprocessador que tem 
a capacidade de gerar interrupções (IN- 
TERRUPTS), ou seja, de tempos em 
tempos o microprocessador interrompe 
a execução de um programa e passa a 
executar uma outra rotina e logo após 
ele retorna ao programa .original. Essas 
interrupções podem ser de dois tipos: 
MASCARÁVEIS e NÃO MASCARÁ- 
VEIS. A interrupção MASCARÁVEL 
pode ser ativada e desativada pelo usuá- 
rio, dependendo dos seus objetivos. O 
Sinclair usa a interrupção mascarável 
para manter o vídeo quando ele opera 
em SLOW. As NÃO MASCARÁVEIS, 
como o nome indica, independem da 
vontade do usuário e não há como evi- 
tar a sua ocorrência. O Sinclair usa esse 
tipo de interrupção para criar um dis- 
play na tela da TV. O endereço 16443 
possui um FLAG que indica o estado 
FAST/SLOW que é o bit 6 (o bit 7 é 
apenas uma cópia desse estado). 

Uma vez que, a cada quadro enviado 
ao vídeo, a variável nos endereços 16436 
e 16437 é incrementada, procede a ob- 
servação quanto às variações em deter- 
minados endereços. Podem ser feitas 
algumas observações: o endereço 16424 
é usado apenas para ajuste de diferentes 
padrões de TVs (norte-americano, in- 
glês, etc.); a interrupção MASCARÁ- 
VEL gera um CALL ao endereço 38H e 
a NÃO MASCARÁVEL ao endereço 
66H. 








Envie suas perguntas para MICRO SISTEMAS/SEÇÃO MS RESPONDE: Av. Presidente Wilson, 165/grupo 1.210, Centro. 


CEP 20030, Rio de Janeiro, RJ. 
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Conheça neste artigo uma maneira prática 
c simples de esconder e diminuir seus programas 


em BASIC no TRS-80 Color 








Camuflando 
Programas 





Celso Bressan 


amos apresentar uma técnica simples mas eficiente 
para dissimular seus programas em BASIC no TRS- 
80 Color Computer e nos seus similares nacionais 
como o CP-400, Codimex, Color-64 e outros. Com 
ela poderemos eliminar os comandos DATA, reduzir a necessi- 
dade de memória e esconder uma parte do programa dentro 
“dele mesmo, tornando-o mais seguro. Poderemos também re- 
solver definitivamente o problema da alocação de sub-rotinas 
em Assembler que ficarão embutidas, quase invisíveis. E, de- 
pendendo da imaginação de cada um, outras possibilidades po- 
derão ser realizadas. 
Para testar esta técnica apresentaremos também um progra- 
ma que simula o jogo do Genius. 


O BASIC 


Um programa em BASIC, para ficar devidamente armazena- 
do na memória, depende essencialmente de dois ponteiros ou 
endereços que existem na área do sistema do nosso micro. São 
eles os endereços de início e de fim dos programas, que se lo- 
calizam nos bytes 25-26 e 27-28 em decimal, respectivamente. 
Vejamos, então, como as coisas se passam com este pequeno 
programa: 

10 READ A,B 

20 PRINT A,B 

30 END 

40 DATA 13,5 
Ele atribui valores às variáveis A e B, imprime 13 e 5 e pára. Na 
memória, ele é armazenado de acordo com a figura 1. 

Vamos a alguns esclarecimentos. No desenho, as linhas es- 
tão quebradas, mas na memória elas ficam umas após as outras. 
Cada linha se inicia com um endereço binário, de dois bytes, 
que aponta para a próxima linha. Mas, na verdade, após a últi- 
ma, existe mais uma, com um endereço igual a zero, informan- 
do ao BASIC o fim real ou físico do programa. A seguir, em 
todas as linhas, vêm outros dois bytes binários que represen- 
tam o número da linha. Não importa o tamanho do número: 
este é sempre armazenado nestes dois bytes. Logo após, vem a 
linha propriamente dita, que geralmente começa com um co- 
mando BASIC, representado pelo seu mnemônico (na figura 
1, são os dois dígitos hexadecimais entre parênteses abaixo 


40 













Endereço 
da próxima Número 
Minha da Unha 







ENDEREÇO 
DE INÍCIO 
DO BASIC 















E q 














ENDEREÇO 
DE FIM DO 
PROGRAMA 









(27-28) 











Figura 1 


do comando), seguindo-se o resto da linha, existindo sempre, 
ao final, um byte em zero binário (na figura, um asterisco). 
Numa inspeção mais acurada encontraremos também algumas 
casas em branco, significando espaços, que servem para dar 
maior clareza ao programa. Alguns programadores usam a téc- 
nica de eliminá-los, diminuindo o programa e aumentando a 
velocidade de execução, à custa da mesma clareza. 


O TRUQUE 


O segredo do que vamos fazer agora é baseado em que, como 
foi dito há pouco, embora o programa termine no END, o fim 
real é indicado pelo endereço em zero binário da última linha, 
no caso, aquela que vem depois do END, e não pelo próprio 
END ou pelo endereço de fim de programa dos bytes 27-28. 
Em outras palavras, o programa pararia de qualquer maneira 
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Ç 


RNA 
VO 
WEIS 


Mesas para terminais 
de vídeo * Fabricação própria 


* Cores discretas 


cs539.850 sua 



















Conosco você encontra também, tudo o mais que 
precisa em vídeo-game, som, telefonia, 
das melhores marcas e procedências, e mais: 
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COMPUTADORES VÍDEOS 





* Suprimentos e Transcodificação todos os sistemas 

e Periféricos e Fitas: VHS - BETA-U-MATIC e para limpeza de cabeça 
º Impressoras e Baterias p/2e 8 hs. 

e Drives e |luminadores ' 

e Placas de Expansão Interfaces - pia É extensão + Abit 

e Cabos : rm mis p/câmeras e vídeos 





* Acessórios nacionais e importados e Curso de inglês em vídeo-cassete 
* Suporte p/ TV teto ou parede * Serviço expresso remetemos para todo Brasil 


BTC” 2001 ALTA TECNOLOGIA 

















BRASILTRADE CENTER 


Av. Epitácio Pessoa, 280 (Esq. de Visconde de Pirajá), Ipanema - Rio de Janeiro - CEP 22471 - 259-1299 
Rua da Assembléia, 10 - Loja 112 (Ed. Cândido Mendes) Rio de Janeiro - (021) 222-5343 
Av. das Américas, 4790 - Sala 615 (Centro Profissional Barra Shopping) Rio de Janeiro - 325-0481 
TELEX (021) 30212 BTCP 
Fábrica: Rua Silva Vale, 416 - Cavalcanti - RJ - Tel.: (021) 592-3047 








CAMUFLANDO PROGRAMAS 





quando fosse encontrado o zero, explicando, assim, porque um 
programa não precisa ter necessariamente um END. 

Para que serve, então, o endereço de fim do programa? Ele 
tem dupla utilidade: indica o BASIC o início da área onde po- 
derão ser colocadas as variáveis do programa durante a execu- 
ção e, ao mesmo tempo, o fim da área correspondente de pro- 
grama que deve ser salva em cassete ou disquete. 

O truque está, portanto, em se deslocar este endereço um 
pouco mais para cima da memória, colocando-se neste espaço 
o que se quiser, e o BASIC nem tomará conhecimento. Com 
efeito, poderemos então editar, inserir ou apagar linhas; salvar 
ou carregar o programa que esta área sempre existirá e perma- 
necerá intacta em seu conteúdo. Só existem três formas de 
atingi-la: via PEEK e POKE ou através do comando NEW, que 
apaga todo o programa. 

A respeito do que foi dito no início, vamos observar nova- 
mente a figura 1. Vemos que o DATA, apesar de conter so- 
mente duas informações, gastou, na realidade, 11 bytes (e este 
é uma DATA muito simples!). Se usássemos PEEK's e POKE's 
gastaríamos apenas dois bytes! O que representa muita econo- 
mia de memória, quando forem vários DATA, e também de 
tempo de execução. 


A TÉCNICA 


Fácil e simples! Basta eliminar os DATA, substituindo-os 
por bytes na área criada acima do BASIC. Esta técnica exige, 
porém, um bom planejamento prévio desta área, pois qualquer 
erro de endereçamento poderá inutilizar nosso programa. 

Façamos, então, um ma- 
[1] pa da área, verificando 
ce |, 
Subrotína em ASSEMBLER 





quantos bytes serão ne- 
cessários, em que ende- 
reços relativos à zero 
eles estarão colocados 
e que tipo de informa- 
ção conterão. No nos- 
| so programa exemplo, 
da o Genius, precisare- 
- id mos de 60 bytes, dis- 
tribuídos conforme a fi- 
gura 2. O byte zero es- 
tará reservado para um 
índice que será o núme- 
ro da figura a ser mostrada no vídeo (a descrição mais detalha- 
da do programa será feita mais adiante); os bytes de 1 até 48 
serão usados para conter uma sub-rotina em Assembler que 
mostrará a figura no vídeo; e os bytes de 49 até 60 conterão 
um array numérico que informará à sub-rotina as coordenadas X 
eYca cor de cada uma das quatro figuras a serem mostradas, 

Feito isto, a etapa seguinte consiste na alocação propria- 
mente dita da área, através dos seguintes comandos da listagem 
1, em modo direto, sem RUN: o primeiro comando obtém o 
endereço atual do fim do programa e o coloca em FP (mesmo 
que não haja programa). A seguir, somamos o número de bytes 
que necessitamos, em FP, calculamos e imprimimos as partes 
mais e menos significativas deste novo endereço. Por último, 
colocamos de volta os valores de A e B, através de POKE, nos 
bytes 27 e 28. A área está alocada. Como já dissemos antes, a 
partir deste ponto, está área estará sempre colada ao programa, 
como uma sombra, com seu conteúdo intacto. 

Vamos agora colocar algo nela, como nosso próximo passo. 
Digite o programa da listagem 2, e vamos ver o que cada linha 
significa, A linha 10 calcula o início da área, que é o endereço 
de fim do programa menos o tamanho da área (60 bytes). A li- 
nha 20 atribui à USR1 o seu endereço de início, que corres- 
ponde ao byte 1, relativo à zero, da área. O mesmo acontece 
com o array numérico, na"linha 30, começando no byte 48. 
As linhas 40 até 140 colocam a sub-rotina no seu lugar, já pre- 
viamente marcada, e as linhas 150 até 190 fazem o mesmo, 











Array Numérico a) 





Figura 2 
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com o array. 


Dê RUN. A área estará inicializada como nós queríamos. 
Embora possamos estar absolutamente certos de que tudo 
correu bem, não convém, ainda, apagar as linhas de 40 até 160. 
Vamos deixar isto para quando todo o programa estiver fun- 
cionando. Mas, evitaremos novas reinicializações a cada vez 
que dermos RUN, colocando o comando 45 GOTO 200. 

Finalmente, a última etapa, que é a do programa comple- 
to. Digite a listagem 3 e teste. Se tudo estiver bem, você já 

derá apagar aquelas linhas do início que agora são inúteis 
não se esqueça de que as linhas 10 até 30 não podem ser apa- 
gadas). Dê o RENUM e salve. O programa não está mais lim- 
po, menor e mais protegido? Quanto à rapidez, esta não será 
sentida neste programa pois ele é pequeno, mas existirá. 


O PROGRAMA 


Esté é um programa simples, que simula o jogo do Genius. 
No vídeo aparecerão, em ordem aleatória, figuras em quatro 
cores má deverão: ser repetidas na mesma ordem pelo jogador. 
Estas figuras são: em cima, na cor azul, correspondendo à te- 
cla “1”; à esquerda, vermelha, tecla “J”: à direita, branca, te- 
cla “K” e, embaixo, verde, tecla “M”. 

O jogo se inicia com uma figura. O jogador responde com 
a tecla adequada. A seguir, aparecerão duas figuras, às quais 
o jogador deve responder teclando na ordem correta e assim 
por diante até eventualmente errar. Então, serão mostrados 
os pontos obtidos até ali. Sons adequados se farão ouvir em 
cada momento. 

Algumas explicações para aqueles que quiserem entender 
ou modificar o programa: 


Listagem 1 


FE=PEÉE (27) *256+FEEE(ZO) 
FF=FF+640 
A=INT(FF/256) 
E=FF-A*2Z56 
FRINT AsE 
a7svalor 
SSsvalor 
































de À 
de E 


FOKE 











Listagem 2 








10 FP=PEEK(27)*256+PEEK(28)-60 
20 DEFUSRi=FP+1 
30 AN=FP+48 


40 K=FP 
So FOR I=1 TO 5 
60 READ A$ 


70 FOR J=1 TO LEN(A$) STEP 2 

80 K=K+1:POKE K,VAL("&H"+MID$(A$,T,2)) 
90 NEXT JsI 

100 DATA LFSLA6ÍDIIACZS4ACHO33D 
110 DATA 33C5E64186203D8B041FO1 
120 DATA E6C43AA6421FE9IFOZS6OS 
130 DATA C6OSEFS1SAZEFB3OSSL64A 
140 DATA ZEF339 

150 FOR I=AN TO AN+11 

160 READ J:POKE I,J 

170 NEXT 1 

DATA 10,0,175,0,5,255 

DATA 19,5,207,10,10,223 
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Listagem 3 





200 
210 
220 
230 
240 
z50 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 


DIM SE(SO) 

P=0 

DE=150 

FOR I=1 TO 50 

CLS 

PRINTEZ66,"G ENI US" 
FOR J=1 TO 200:NEXT J 
cLso 

FOR J=1 TO 130:NEXT J 
FOR J=1 TO I 

K=RND (4) 
SE(J)=K 
FOR L=1 TO 
POKE FP,K 
L=USRL(O) 
SOUND Kw40,1 

FOR L=1 TO SO:NEXT L 
cLso 


DE:NEXT L 


5: femicro 


Seminário de Microcomputadores 
Rio de Janeiro 12 a 16 de Agosto 


NÚCLEO DE COMPUTAÇÃO ELETRÔNICA 


Universidade Federal do Rio de Janeiro 


OBJETIVOS 


Difundir o microcomputador como ferramenta de uso cotidiano e profissional e 
incentivar o desenvolvimento de software aplicativo e a sua comercialização. 


TEMAS 

Aplicações de microcomputadores; Desenvolvimento de software aplicativo; 
Comercialização de software; O micro na educação; Tendências de arquitetura 
de micros e de redes locais; Microeletrônica; Tecnologia Nacional de 


380 
390 
400 
410 
420 
430 
440 
430 
460 
“70 
“so 
490 
500 
s10 
s20 
s30 
540 
sso 
560 
570 
s8o 
590 


NEXT J 

FOR J=1 TO I 

AS=INKEY$:IF A$ THEN 400 
K=-(A$S="1")-2*(A$="]")-3x*(AS="K")-4*(AS="M') 
IF K=0 THEN SOUND 200,1:G0TO 400 
POKE FP,K 

L=USRI(O) 

IF SE(J)<)K THEN S40 

P=P+1 

SOUND Kx40,1 

CLSo 

NEXT 3 

DE=DE-S 

IF DE(20 THEN DE=20 

NEXT 1 

GOTO 230 

PLAY"LISABCDEFG" 

CLS 

PRINT €106,"G E NI US" 

PRINT €203,"PONTOS=";P 

PRINT €498,"TECLE ALGO" 

IF INKEy$="" THEN 590 ELSE 210 

















Na linha 220, a variável DE indica o tempo de espera entre 
uma figura e outra (para os mais lentos, basta aumentar este 
valor). A cada sequência de figuras, este tempo vai diminuin- 
do. 

O laço principal do programa, que permite até SO seqiuên- 
cias, está contido da linha 230 até a 520, sendo que as linhas 
240 até 380 e 390 até 490 mostram e pedem a sequência, res- 
pectivamente. 

Finalmente, a sub-rotina em Assembler é referenciada nas 
linhas 340 e 440 e usa o número da figura K, colocada pelas 
linhas 330 e 430. 

Naturalmente, está técnica permite um número infinito 
de variantes que caberá ao leitor inventar e usar. Variáveis 
do tipo string, por exemplo, também podem ser colocadas 
na área (aliás, indiretamente, isto foi feito com a sub-rotina). 
Do mesmo modo, a ordem de execução das etapas de 
elaboração do programa pode ser modificada, ressalvando- 
se, entretanto, a primeira. No caso da modificação de um 
programa que já existe, a alocação da área será a última coi- 
sa a se fazer. Como regra geral, lembre-se: antes de qualquer 
RUN, salve o programa como ele estiver, já que qualquer 
erro poderá ser recuperado com uma recarga do programa. 

Uma outra possibilidade fascinante são os programas que 
aprendem, isto é, basta modificar a área a cada execução e 
salvar ao final. Um último lembrete: nenhum programa, 
embora pronto, é considerado imutável, principalmente 
os longos. Portanto, tenha sempre duas cópias do progra- 
ma, uma completa, que permitirá modificações, e outra 
reduzida, para uso do dia-a-dia. 


Celso Bressan é formado em Engenharia Eletrônica e pós-graduado em 
Sistemas de Informação pela UFRGS. Trabalha em processamento de 
dados desde 1969 e atualmente é Analista de Sistemas na Fundação Me- 
tropolitana de Planejamento, em Porto Alegre. 
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Informática. 


EVENTO ESPECIAL 


4? Microexposição de Fabricantes Nacionais de Micros, Periféricos 


Software e Suprimentos 


EVENTOS PARALELOS 


1 SACI - Seminário de Aplicações Científicas em Informática 


14 a 16 de agosto 


Ill SEMAP - Seminário de Microinformática na Administração 


Pública - 14 e 15 de agosto 


INFORMAÇÕES 


Núcleo de Computação Eletrônica 
Caixa Postal 2324 - CEP: 20001 - RJ 


Tels: 290-3212 ramal 248 e 270-2438 


























face. 
Aplicações: 

— Aprendizado do inglês; 

- Torna seus programas aplicati- 
vos educativos e jogos falados. 

- Acompanha disco c/software de 
demonstração e manual detalha- 
do. 

Garantia de 90 dias. 

Opcional: 

Mini-dicionário c/3.000 palavras 

no soft, para consultas rápidas em 

português/inglês ou vice-versa. 





Reproduz a voz hu- 
mana perfeitamente. 
Permite que se varie a to- 
nalidade, volume e velocida- 
de da voz. Basta digitar a pala- 
vra € ouvir com a pronuncia correta em inglês ou portu- 
guês. Facílima operação. Já vem com alto-falante na inter- 


[Demoro 


p= ————-————— 


O) INTERFACE PALM, DISCO 
E MANUAL POR Cr$ 386.000 
O) TAMBÉM MINI-DICIONÁRIO 
POR Cr$ 34.000 
O Mais INFORMAÇÕES. 
E: 


END.: 

CEP: CID.: EST.: 
ENVIE CHEQUE NOMINAL À 
PALM SOFT LTDA. 

R AUGUSTO STELLFELD, 1314 
CEP 80000 — CURITIBA - PR 

























Veja nesta parte do artigo como calcular os lucros 


de sua empresa nos próximos anos, utilizando a análise 
de correlação, regressão e projeções lineares 








Estatistica Aplicada Ill 


ses sm ET 


CORRELAÇÃO, REGRESSÃO 
E PROJEÇÕES LINEARES 


A empresa K, I. Tudo Ltda. apresen- 
tou, nos últimos cinco anos, o seguinte 
desempenho em bilhões de cruzeiros: 





Lucro 


-0,8 | -0,3 


Ano 1980 | 1981 | 1982 [1983 | 1984 
2,0 











1,8] 2,5 
Líquido 


Considerando que a situação dos 
últimos anos permaneça por mais dois 
anos, qual seria o lucro líquido espera- 
do para 1985 e 1986? Esta questão foi 
proposta ao João, nosso esforçado ana- 
lista, pelo Sr. Barbosa. Pela solução do 
problema, ele ganharia uma gratificação 
de Cr$ 50 mil e, se acertasse, poderia 
até ser promovido. 


A TEORIA 


Um problema frequente é o da deter- 
minação do valor de uma grandeza par- 
tindo do conhecimento do valor de uma 
outra, ou porque esta última é de deter- 
minação mais fácil ou porque antecede 
no tempo. Outra situação é a necessida- 
de de se verificar se existe correlação en- 
tre as duas variáveis e, caso isto ocorra, 
projetar valores num tempo futuro. 

A medida da pressão de um gás com 
base na sua temperatura; a resistência do 
aço com base no seu acabamento super- 
ficial; o atraso nas entregas com o mês 
de dezembro; o desempenho financeiro 
com a política salarial vigente são exem- 
plos onde a Análise de Correlação e Pro- 
gressão é bastante útil. 
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AJUSTAMENTO LINEAR 
(MÉTODO DOS MÍNIMOS QUADRADOS) 


Considerando n pares de valores para 
as variáveis X e Y, o procedimento ini- 
cial lógico é colocar estes valores num 
diagrama ortogonal como o da figura 1. 

Para evitar um critério discutível para 
o ajustamento linear a esses pontos, tor- 
na-se necessário'a definição da “melhor 
reta de ajustamento”, Considerando que 
a equação y = a + bx represente esta re- 
ta, os valores de a e b podem ser estima- 
dos pelo método dos mínimos quadra- 
dos. Veja na figura 2 que a corresponde 
ao ponto de interseção da reta com o 
eixo », e b é um coeficiente que indica 
o ângulo de inclinação da reta. Este mé- 
todo garante que a soma das distâncias 
verticais entre os pontos observados e os 
estimados, elevadas ao quadrado, seja a 
mínima possível. 


Y| Líguido 





Esta minimização é obtida pela deri- 
vação parcial (método matemático) da 
soma das distâncias em relação aos pará- 
metros a e b. 

Sendo X a variável independente e Y 
a variável dependente, a derivação resul- 
ta em que 

n n 
na+b .£ 


E j=1 Xi 
n n n 2 
E XY val X. +Dbo DX, 
dm, dei * i=1 À 
ou 

n - 
Do RX = Mi 
a "à 
b = i=l 
Ty 2 
r x2 -nxX 
é i 
i=l1 


az=T-bkX 
onde 





n 


Z Y; = soma dos valores da variável 
Y (soma das projeções dos 


ic pontos sobre o eixo Y); 





n 
z X; Y; =soma dos produtos de Xe Y; 


i= 1 
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Z X = soma dos valores de X, ele- 
vados ao quadrado; 


e 
X = médiaaritmética de X (2, Xj/n); 


Y = média aritmética de Y; 





n = número de pares de valores. 





MEDIDA DE DEPENDÊNCIA 


Teoricamente é possível o estabeleci- 
mento de uma reta de regressão entre 
duas variáveis quaisquer. Pode-se, por 
exemplo, relacionar os pontos obtidos 
pelos alunos no vestibular com suas es- 
taturas. Só que, neste caso, a regressão 
obtida não terá qualquer valor prático. 

Uma medida do grau de dependên- 
cia entre as variáveis X e Y pode ser 
obtida pelo “coeficiente de correlação 
amostral”: 





O coeficiente de correlação r, intro- 
duzido por Karl Pearson, mede a quanti- 
dade de dispersão dos pontos em tomo 
da equação. Outra medida de dependên- 
cia é o “coeficiente de determinação” 
r?. Ele é interpretado como indicador 






r=1 x 
dependência total 
positiva 
ha 
“e 0 
º 
LM] 





0<r<l X 
dependência parcial 


positiva 


Figura 3 
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ponto estimado 





Figura 2 


de quantos por cento a variação explica- 
da pela regressão representa da variação 
total, 

Ambos os coeficientes variam de —1 
a 1, onde o sinal (+ ou —) indica o senti- 
do da dependência, e o módulo o grau 
de dependência. Quanto mais próximo 
da unidade, maior a dependência. A fi- 
gura 3 ilustra algumas situações. 

Genericamente pode-se dizer que: 


Irl< 0,7 = dependência insigni- 
ficante 
0,7 < Irl<0,9 = dependência signifi- 
cante 
Irl>0,9 = dependência forte 
Também é possível'a realização de 
um teste de significância para r, através 
do cálculo de 


ga r? 
que segue uma distribuição de Student 
com n-2 graus de liberdade. O coefi- 
ciente de correlação é significativo num 
grau de confiabilidade 1 — a, set>H, 





=-1 x 
dependência total 


negativa 





rs0 x 
sem dependência 





ATENCAO: 
EMPRESAS 
SOFTWARE-HOUSES 
CENTROS DE INFORMACAO 


NÃO LEIAM ESTE ANUNCIO SE 
SEREM CONT 


QUISE INUAR ATRAS 
RQUELE CORSO til 
ADDRESS VIDES 


COMPUTER 
CONNECTION 


EDIÇÃO EM VIDEOCASSETE 
-+CURSOS E TREINAMENTOS 
PA TRAS ILUSTRADAS 
sVT'S INSTITUCIONAIS 
EVENTOS 

EDIÇÃO COMPUTADORIZADA 
COM OS MAIS MODERNOS 


RECURSOS DE ANIMAÇ 
DIGITAL. 


IDEAL PARÁ TREINAMENTOS 
CONSTANTES EM EMPRESAS 
OU CURSOS A DISTÂNCIA. 


METODO  VIDEOTEACH é * 


24ADDRESS* 
Video Computer Connection 
CENTRAL DE INFORMAÇÕES 
011 211-5348 » 011 212-0370 
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ESTATÍSTICA APLICADA Ill 


sendo H = ta ;n — 2 obtido de uma ta- 
2 

bela de Student, encontrada em livros 
de estatística. A figura 4 mostra uma ta- 
bela parcial de Student. 

Agora, que já vimos a teoria, vamos 
dar uma mão ao João. Para isso, fare- 
mos: 


X=ano UE ESET 
y=lucro | -0,8 |-0,31 2 11,81 2,5 





onde 
=" É da 

EX, = 15 EX, = 55 
Ly, = 5, 

EP Se2 EYvÊ = 14,22 
LX;y, = 24,3 Z=3 

Y=1,04 n=s5 
assim: 
p= 24,3 - (5)(3)(1,04) 6 65 

jo SEA Go) Eb ed) 

a = 1,04 - (0,87)(3) = -1,57 


resultando na equação linear 
Y=-1,57+0,87X. 


O grau de dependência entre a variá- 
velXe Y é de: 


c = 0,87 1/ 55 - (5)(3)(3) = 0,9268 
14,22 - (5)(1,04)(1,04) 


r2 « (0,9268)? = 0,8589 


Realizando o teste de significância: 


d 0,9268 
Va - (0,9268)2 


Da tabela da figura 4, verificamos 
que H = 3,182 para um nível de confia- 
bilidade de 95%, satisfazendo, assim, a 
condição de t 2 H (o mesmo já não 
acontece para 99%). Deste modo, João 
pode afirmar com 95% de confiabilidade 
que a dependência é significante. 





+ 


| V5-2 = 4,274 


PROJEÇÕES LINEARES 


Conhecendo-se a equação de míni- 
mo quadrado e sabendo-se que a depen- 
dência é significativa, é possível a esti- 
mativa do lucro líquido para os próxi- 
mos anos. Assim, é suficiente fazer: 


Y=-1,57+(0,87/6) = 3,65 
=-1,57+(0,87(7) = 4,52 


Isto significa que a K, I. Tudo Ltda. 
pode esperar um lucro líquido de apro- 
ximadamente Cr$ 3,65 bilhões para 
1985 (ano 6) e de Cr$ 4,52 bilhões 
para 1986 (ano 7). 

Esta estimativa é chamada “estima- 
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Números de 


pares de 
valores 


Grau de confiabilidade 





Figura 4 — Valores de H 


tiva por ponto”. Sempre que possível, 
deve ser estabelecida uma “estimativa por 
intervalo”. Esta estabelece um intervalo 
dentro do qual a variável X ocorrerá 
com 95% ou 99% de confiabilidade. 

A fórmula para o cálculo dos limites 
inferior e superior é bastante complexa 
e, por isto, omitida neste artigo. Para 
obté-la, consulte os livros de estatística. 

Para o problema abordado, o interva- 
lo para um índice de confiabilidade de 
95% será: 


1,858 « | lucro líquido | ( 5,442 
1985 


6,812 


2,228 « E líquido ] % 


1986 


João terá uma possibilidade máxima 
de 5 em 100 (95%) de ser promovido, se 
disser ao chefe que seu lucro líquido em 
1985 deverá estar entre 1,858 e 5,442 
bilhões de cruzeiros. 


O PROGRAMA 


Com base num conjunto de pares de 
valores para X e Y, o programa da lista- 
gem 1 (que deve seragregado aosanterio- 
res) determina: 

e a reta de regressão linear de X 

sobre Y í 
e a reta de regressão linear de Y 
sobre X 


Y = CR$ 


X = ANO 


x(1)=1 
x(2)=2 
X(3)=-999 
DIGITE O PAR 


2 7.3 
Y(2)=-0.3 
Y(3)=2 

Y(4)=1.8 
Y(5)=2.5 


Y(1)=-9.8 
Y(2)= 0.3 


<X> , <Y> ERRADO 


x(2)=2 
x(3)=3 
x(4)=4 
x(5)=5 
x(6)=999 





Figura 5 





e o coeficiente de correlação linear 

e ocoeficiente de determinação 

e a média aritmética e o desvio-pa- 
drão dos valores de X 

e a média aritmética e o desvio-pa- 
drão dos valores de Y 

e ovalordet 

e a estimativa por ponto e por inter- 
valo para a variável X ou Y 

e a representação gráfica de regres- 
são linear 


O programa deve ser rodado em três 
etapas: 


12 etapa: determinação da reta de re- 
gressão — (corresponde ao trecho do 
programa entre as linhas 1500 e 1818) 
Quando da presença do menu inicial, di- 
gitar o código 3 (o menu foi apresenta- 
do em MS nº 44). Após indicar o nome 


: VARIÂNCIA 
* DES. PADRÃO 
Cr$ : MÉDIA : 1.04 
+ VARIÂNCIA : 2.293 
Edi cica 2 DES. PADRÃO. 
COEP. CORRELAÇÃO 
COEF. DETERMINAÇÃO 
VALOR Z(EST. VARIÂNCIA) 


1 1,5811388 


«92679143 
P.85894235 

3 0.37557642 
: 4.2749964 





SOBRE CRS 


: 9.98729996 
: 1.9732183 


REGRESSÃO DE ANO 


A (INCLINAÇÃO) 
B (INTERSECÇÃO) 
S (EST. VARIÂNCIA) 


SOBRE ANO 


REGRESSÃO DE CR$ 
A (INCLINAÇÃO) : 0.87 


2 =1,87 
3 0.55744955 


B (INTERSECÇÃO) 
S (EST. VARIÂNCIA) 





Figura 6 


das variáveis X e Y, os dados devem ser 
digitados aos pares (X, e Y1; X, e 
Y5...). O final da entrada de dados é in- 
formado pela digitação do número 999 
para a variável X. Na ocorrência de um 
erro de digitação, constatado após se 
teclar NEWLINE, digitar — 999 para o 
próximo X, repetir os valores de X e Y 
anteriores (um dos dois errados) e digi- 
tar os valores corretos. A figura 5 mos- 
tra a entrada de dados para o problema 
do João. 

Após o processamento dos dados in- 
formados, o programa apresenta Os re- 
sultados da figura 6. 


22 etapa: representação gráfica da re- 
gressão — (corresponde ao trecho do 
programa entre as linhas 2500 e 2672) 
Após retomar ao menu inicial, é sufi- 
ciente digitar o código 5. Esta etapa uti- 
liza os dados da anterior, não havendo 
necessidade de nova entrada de dados. 


32 etapa: projeções lineares — (corres- 
ponde ao trecho do programa entre as 
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IF AJU/1 THEN GOTO 1504 
DIM UISO) 
DIM T(50) 
LET 
LET 
CET 
LET 
cer 
Ler 1 
IF AJU>1 THEN GOTO 1810 
LET AJU=VAL "1 

INDIQUE O NOME DAS U 


MAXIMO DE 6 LETRAS 

PAUSE 180 

SCROLL 

BRINT x = 

INPUT X8 

PRINT XE 

SCROLL 

PRINT “y 

INPUT y8 

PRINT v8 

SCROLL 

FOR I=VAL "1" TO VAL “31 

PRINT ”- 

NEXT 1 

SCROLL 

ERINT "DIGITE OS VALORES DE 

SCROLL 

PRINT “DIGITE 

ULTIMO VALOR: 
SCROLL 

FOR IsPI/PI TO VAL “31 

PRINT "= 

NEXT 1 

GOSUB sooe 

IF AJU=1O THEN 6010 3026 

SCROLL 

PRINT CX, NGC) = 

INPUT x 

IF X=-999 THEN GOTO 1600 

PRINT X, + 

IF X=999 THEN GOTO 1650 

No) 





o 
a 


Japagapa popa po parata boba paa Dava pa papa 
O RR CR CRER CR A ERRA A A 

GOVUU VOC ORRRNNR Mn 6 

DAGAPONLEC ONA DOU PO 


e 


999, APOS 











Soto 1585 
FAS 

cis 

LET Ensu-i 

CET NDFaN-vAL “3 

CET xm=5X/EN 

LET yM=5Y/EN 

LET RNUM=ENSSSxr-5x4SY 
LET DSSX=ENASSX-5X+SK 


papato posa pata popa patapapaça pa 
APONPOLSLNLE DO 


Listagem 1 


DSSr =ENESSY-S745Y 
VX=DS5X/ (EN+ EN-1)) 

Vy =D83Y7 (ENS (EN-1)) 
30x=50R (UX) 

SDY=50R (Uv) 
RERNUM/SOR (D5SX4DSSY) 
RS =RsR 

TT=S0R (IRSOSNDE) 2(1-RS 


SEZ=S0R (1-R50) 
SEXY =S0x4SEZ 
SEvX=2DY sSEZ 
AX=RNUM/D35Y 

LET CX=iSSveSX-Svessxv) 7058 


LET Av=nNUM/DSSX 
LET Cr=1SSXASY-Sxessxr) 7055 


sou 
PRINT AT 0,0: X8;AT 0,6 M 

XM;ÁT 1,8 ÚRRTANC 
UX,AT 2,6,” DE.PADRAO 


PRINT AT 2.0; Y8;AT 3.6 m 
T aê VARTANC 
DE.PADRAO 





IA AA AS AN RAAO 


20 coma assada 


aa 
DPS SU GJ0UP ONVODAIA 


ass 


Apa QUA pata Cp papa papa Oppo apapapapapa 
nox 


DONO TONI 


COEF.CORRELACRO 
COEF.DETERMINACAO 
VALOR Z (EST.VAR) 


PRINT "UALOR T (“;TAB S;NDF 
13, "GL) : STT 
S05UB 1800 
PRINT “REGRESSAO DE “xs; TA 
SOBRE, YA 
PRINT "A (INCLINAÇÃO) 


PRINT “B (INTERSECCAO) 
PRINT “S (EST.VARIANCIA) 


cosuB 1800 
PRINT “REGRESSAO DE 
SOBRE ";x8 
PRINT “A (INCLINACRO) 


PRINT “B (INTERSECCAO) 
PRINT “S (EST.VARIANCIA) 


INPUT US 

es 

Goto «3 

FOR I=VAL “O” TO VAL “ai 

PRINT 

NEXT 1 

RETURN 

FOR IsPI/PI TO NE 

LET Sx=Sx+U(I) 
Sy=SysT II) 
55x=55X+U(T) 442 
SSv=5SysT II) ssa 

LET 55xv=55XY4ULT) eT CT) 

NEXT 1 

LET NºNEsPI/PI 

Goro 1851 

FOR I=UAL “1º TO VAL “Bo” 

PRINT AT 6,7; “PROJEGAO LINE 

AT 8.13 "E /AT 10,4; INTERVA 

Los DE CONFIANCA",AT je,11; "DE & 


MEXT 1 
eu 
2004 PRINT "ESTIMATIVA DE «X> OU 





STA 


ipa japa fa tnta epa 66 OO RIO pa Pe 


COD DD A A IO ID 
SOMA ONE DONE GN=OS 


ET 
259 
E 





Correlação, Regressão e Projeções Lineares 


linhas 2000 e 2200) Após retornar ao 
menu inicial, esta etapa se inicia depois 
da impostação do código 4. Após indi- 
car qual a variável a ser estimada (variá- 
vel dependente), digitar as variáveis in- 
dependentes para as quais a estimação é 





Rea 999 


6 


7 





Figura 7 
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(S/N) 






ESTIMATIVA DE <X> OU <Y> =Y 


PARA X= LIM. 


INF. Y EST. 


3.65 


1.8583545 


4.52 


2.2281194 


desejada. Digitar 999 após o último va- 
lor da variável independente. A figura 7 
ilustra a entrada de dados e o resultado 
desta etapa. 

É possível passar diretamente da pri- 
meira etapa para a terceira. Devido às 


LIM. SUP. 


5.4416455 


6.8118897 


NOVAS PROJEÇÕES ? 


“ THEN GOTO 2180 
“ THEN GOTO 2020 
AO ENTENDI...” 
"DIGITE <X> OU «y>" 


5 
PRINT “DIGITE OS VALORES 
PRINT "BÁSICOS P/AS ESTIMAT 


«999 APOS O 





PRINT OS 
LET I=VAL “o 
LET IsTeVAL "1 

INPUT UI) 

PRINT UIT) vor; 

IF UI) (999 THEN GOTO 2032 
LET TANTO=I-1 

LS 


€ 
LET T=UAL "1.96" +UAL “2.978 
“2, 0227" /NDF/NOF 
* THEN RETURN 
"PARA X= LIM.INF. Y E 





=BI 
1/PI TO TANTO 

LET JESTISEVXESOR (1/ENS()( 

Mm) 4427 (55X-EN 


PRINT OS 
LET UD=UD41 
UD<6 THEN GOTO 2191 


NESLS LONGA ONSXA-OS 


a PRINT és 

FOR I=PÍ/PI TO TANTO 

À LET JE=TeSEXVS (SOR ((1/ENO( 
1 VM) +82) /(35Y-ENGYMAYM))) 
LET UD=PI-PI 

LET VA=CX+AX+U (IT) 


ERINT U(I)-TAB 16;UA 
PRINT TAB 8, UA-JE.TAB 22,UR 


PRINT 08 
LET UDaUD+PI/PI 
IF UD<VAL “6” THEN GOTO 219 


INPUT US 

LET Un-*T-pI 

FAsT 

eis 

sLou 

NEXT 1 

SCROLL 

SCROLL 

PRINT “NOVAS PROJECOES 7 (3 


INPUT Us 
IF U8="3" THEN GOTO 2002 
eis 


O O O O O O O O 6 ROO O OO O RODO O O O O RO ARO O 
DO PA papa ta tata papafaC papapa pa papopa cfpapapapa pata pao papo  pobapo o popapota of 


SSOVOGOS BIT IIIDADDA AASOUNDNDONDDS RO 


PONSDOIS NBA SAGA 


2502 NEX 








asos cLs 
2504 IF AJU>0 THEN GOTO 2509 
2505 PRINT AT 18,0; “NAO TENHO AS 
INFORMACOES”; AT 16,9; NECESSARI 
5 P/PROCESSAR” AT É0.0, "ESTA TA 

LAT 21,0; CONSUÍTE O MANUR 
Lo- PAG. x 

6 PAUSE 600 

eis 

Goto 43 

LET MIX=VAL "1000000 

LET MIYeMIX 

LET MAX=PI-PI 

CET Ay =Mãx 

FOR IsPI/PI TO EN 

IF U(I) cMIX THEN 


1F ULI)>MAX THEN 
IF TID cMIY THEN 
IF TII)SMAY THEN 


NEXT 1 
DIM O(EN) 
DIM C(EN) 
FOR I=BI/PI TO 
LET OI) =INT (( 
AX-HIX) 458) 45 
2832 LET C(I)=INT ((TUID HIV) IM 
AY-HIV) 496) 45 
2533 NEXT 1 
2540 FOR 153 TO 30 
2841 PRINT AT 18,1;"- 
2542 NEXT 1 
2843 FOR 1=18 TO 1 STEP -1 
2544 PRINT AT 1,9," 
2545 NEXT 1 
2546 PRINT AT Q,0,Y8:AT 21,26:X8 
MATA NT (MAVICAT 20,0, INT (1 
haysmíviza) AT 18.0, INT (MIv) AT 
20,2. INT (MIX) AT 20.15. INT 1(M 
AXeMIX)/2),AT 20,26; INT (MAX 
2547 LET Ube".coserccrer runas 


N 
CI =MEXI ZM 








US/AT 9,3,U8,R 


PRINT AT 1.30 
NEXT 1 
FOR I=1 TO EN 
PLOT O(I) CIT) 
NEXT 1 
GOTO AJusso.2600 
coro 2505 
LET sX=0 
LET Sy=5x 
LET $$x=5x 
LET SSy=5x 
LET 55xv=5x 
FOR I=1 TO Eu 
LET Sx=Sx+011) 
LET 55x=55X+0 (1) ee2 
LET SYaSVSCII) 
LET SSv=5Sy+C(I) ss 
LET SSXv=3SXV+CII) s0(I) 
NEXT 1 
LET AY=(ENSSSXY-SXESY) 7 (ENE 
55x-5X45%) 
2664 LET Cy=155Xe5Y-5X458XY) 2 (EN 
455X-5X45X) 
2666 FOR X=0/1) TO O(EN) 
2668 IF (Cr+Av4x)>0 THEN PLOT X 
INT. (CY+AV 8X) 
2569 NEXT X 
2670 INPUT US 
2671 Cs 
2672 GoTO «o 





alterações que ocorrem em algumas va- 
riáveis na execução da 32 etapa, não é 
possível o retorno à 22, Para a represen- 


tação gráfica, os dados devem ser redi- 















gitados. 

Neste número a estimativa foi efetua- 
da com base numa equação linear (linha 
reta). Será que conseguimos ajudar o 
João ou uma estimativa não-linear (cur- 
va) seria melhor? Bem, isto veremos no 
próximo número. Até lá, então. 








Raul Udo Christmann é engenheiro e trabalha 
como Assessor de Pesquisa Operacional na 
Adubo Trevos S.A., onde utiliza um Burrou- 
ghs 6900. Professor de estatística e pesquisa 
operacional nas UFSM e UFRGS, desde 1969, 
Raul desenvolve, em casa, programas educati- 
vos para a área psico-pedagógica, por enco- 
menda. Tem um livro publicado pela Editora 


Edgard Blucher e outro pela Editora Campus. 
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Aprenda neste artigo a alterar, ler e escrever 


iniciante 


na memória do micro. Faça isso 


usando os poderosos comandos BASIC... 





Nelson N. S. Santos 


Peeks e Pokes 


EEK e POKE são “instruções” da linguagem BASIC 

que permitem, respectivamente, verificar e alterar o 

conteúdo da memória. 

Nos micros mais populares (as famílias Apple, Sinclair 
e TRS-80), a memória está organizada de tal maneira que seus 
conteúdos sejam números de 8 bits. Logo, o conteúdo de uma 
posição de memória pode ser qualquer número binário entre 
0000 0000 e 1111 1111, o que corresponde em decimal ao in- 
tervalo de O até 255 (ver obs. 1), totalizando 256 possíveis 
conteúdos diferentes. Observe: 


2Ã = 256 
nº de bits 


Microprocessadores tais como o 6502 (Apple) e o Z-80 
(Sinclair e TRS-80), além de um barramento de dados de 8 bits, 
têm um barramento de endereços de 16 bits. Assim sendo, po- 
dem gerenciar uma memória de 64 Kb. Vamos entender isso? 


24 = 65536 a = 64 Kby 


he de bits 1024 


Naturalmente, o sistema operacional do micro e o BASIC 
residente irão ocupar uma parte desta memória, de tal forma 
que os 64 Kb não estarão inteiramente disponíveis ao usuário 
para O armazenamento de programas e/ou dados. 

O comando POKE mn coloca um número n (0<n <255) 
na posição de memória cujo endereço ém (0<m <65535). Em 
verdade, o comando POKE só funcionará se o endereço m cor- 
responder a uma posição da RAM, pois POKEs na área da 
ROM são destruídos pelo sistema operacional do micro, uma 
vez que a ROM deve ser preservada intacta. 

Certifique-se de ter entendido: o comando POKE 20000,51 
coloca o número 51 na posição de memória cujo endereço é 
20000. 

Já PEEK é uma função cujo argumento é o endereço. Ela 

rmite verificar o conteúdo de qualquer posição da memória. 

or exemplo, 


pois 1 Kb = 


A = PEEK (20000) 
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“apanha” o número armazenado na posição de memória ende- 
reçada por 20000 e o associa à variável A. Por sua vez, 


PRINT PEEK (20000) 


exibe este número na tela. 

PEEK pode ser usado para examinar o conteúdo da memó- 
ria, para ver como programas BASIC são armazenados ou para 
examinar o conteúdo da ROM. O programa a seguir verifica o 
conteúdo de qualquer posição da memória: 


10 PRINT "DIGITE O ENDEREÇO" 

20 PRINT "ENDEREÇO", "CONTEÚDO" 

30 INPUT E 

40 IF E&>INT(E) OR EXO0 OR E>65535 THEN PRINT E, "ENDEREÇO INVÁLIDO" 
50 PRINT E,PEEK (E) 

60 GoTO 30 

70 END 


Uma vez que o comando POKE permite alterar o conteúdo 
da memória, deve ser usado com muito cuidado. Colocar inad- 
vertidamente um valor na área de memória ocupada por um 
programa BASIC alterará este programa, podendo fazer com 


Figura 1 — A tela do TRS-80 tem 1024 (1 Kb) posições para caracteres. 
No diagrama, as posições dos caracteres estão marcadas pelos endereços 
da memória nos quais elas estão mapeadas. 
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a) POKE 15360,42 











Figura 2 — O efeito do comando POKE na memória da tela. O comando 
POKE (a) coloca no endereço 15360 o conteúdo 42 (b). Mas a locação 
15360 está mapeada ao canto superior esquerdo da tela. O gerador de 
caracteres (c) mostra que 42 é o código ASCII para ““«”, Assim, a tela 
aparece como em (d). 


que um programa correto comporte-se inadequadamente na 
próxima vez em que for rodado. Por outro lado, POKE pode 
ser introduzido num programa para fazer com que ele se auto- 
modifique ao rodar, o que abre uma imensa gama de aplica- 
ções. Programas que renumeram outros programas BASIC ba- 
seiam-se neste princípio. Programas em linguagem de máqui- 
na também são carregados na memória através de comandos 
POKE (ver obs. 2). 

A maioria dos micros, entre eles a família TRS-80 (CP-500, 
DGT-1000, SYSDATA III etc.), tem telas mapeadas na memó- 
ria. Seus displays de tela são produzidos examinando o conteú- 
do de uma particular área da memória: diz-se que a tela está 
mapeada nesta região. Para dar um exemplo concreto, vamos 
considerar a família TRS-80. Sua tela tem 16 linhas ao longo 
das quais um caráter pode ocupar qualquer uma das 64 posi- 
ções, produzindo 1024 (1 Kb) posições de caracteres ao todo. 
Em qualquer instante o display é produzido, examinando as lo- 
cações de memória com endereços de 15360 a 16383. A forma 


pela qual a tela é mapeada na memória é mostrada na figura 1. 
Quando um número é armazenado em uma destas locações, o 
caráter cujo código é este número aparece na posição corres- 
pondente da tela. 

Conseqiientemente, o comando POKE pode ser usado para 
gerar displays numa tela mapeada na memória, fazendo com 
que ele coloque os números apropriados na memória da tela. 
À figura 2 ilustra a sequência de eventos que ocorrem quando 
um simples comando POKE é usado desta maneira. 

Assim, para colocar um asterisco no canto superior esquer- 
do do vídeo, você deve fazer: 

a) Linha TRS-80 
POKE 15360,42 
b) Linha Apple 
POKE 1024,42 
c) Linha Sinclair 
LET DF=PEEK 16396+256*PEEK 16397 


POKE DF+1,23 4) 


(ver obs. 3) 


(ver obs. 





ALGUMAS OBSERVAÇÕES 





OBS. 1 — É bastante usual, e cômodo, exprimir-se o conteúdo 
de uma posição de memória em hexadecimal, no intervalo de 
00 a FF. 

OBS. 2 — Sobre o uso de comandos POKE, para carregar na 
memória programas em linguagem de máquina, aguarde o ar- 
tigo “O que são, e como digitar, programas em linguagem de 
máquina”. 

OBS. 3 — Enquanto na linha TRS-80 a primeira posição da tela 
tem endereço 15360, na família Apple este endereço é 1024. 
OBS. 4 — À tela dos Sinclair é mais complicada. Para começo 
de conversa, o endereço inicial do arquivo não é fixo, flutuan- 
do entre o programa BASIC e a área das variáveis. Além dis- 
to, este endereço não corresponde ao canto superior esquerdo 
da tela: na verdade, o conteúdo desde endereço não pode ser 
alterado por POKE sob pena de perda de controle (CRASH); 
o canto superior esquerdo da tela corresponde ao próximo en- 
dereço. E mais ainda: os códigos dos caracteres não seguem o 
padrão ASCII. Consulte o manual ou um livro sobre o assunto. = 


ea 





Nelson N. S. Santos é professor de Química e Matemática. Usuário de 
um micro de lógica Sinclair, é autor do livro Além do BASIC, sobre lin- 
guagem Assembler para linha Sinclair, recentemente lançado pela edito- 
ra Campus. 
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Ao final desta série de artigos, o leitor e usuário de Apple poderá 
dispor do mapa geral da memória. Informe-se e bom proveito 











Apple: 


o mapa da ROM (ll) 


Aldo Felicio Naletto Junior 





este número, concluiremos o Mapa da ROM do Apple 

apresentando a parte do Sistema Operacional. A se- 

guir, mostraremos o Mapa Geral da Memória: ele dá 

uma visão global de como a memória é ocupada pelo 

Apple, especificando as variáveis do sistema, os endereços da 

área de entrada/saída etc. Como no mapa da ROM, serão usa- 

dos sinais nos primeiros 256 bytes para identificar as posições 

desta área conforme seu uso. O sinal *%” significa variável es- 

pecífica do sistema e o sinal “8 variável de uso geral ou tem- 
porário. 

As variáveis.do primeiro tipo são usadas pelo sistema para 





guardar vários parâmetros necessários ao seu funcionamento, 
enquanto as outras só têm utilidade para ele durante a execu- 
ção das rotinas que as empregam, podendo ser utilizadas pelo 
usuário fora disto. 





Aldo Felicio Naletto Junior tem 26 anos, é engenheiro eletrônico 
formado pela Escola de Engenharia de São Carlos, da USP, trabalha 
como pesquisador do Projeto CATE, da Telebrás, no laboratório de 
Eletretos do Instituto de Física e Química de São Carlos e no Banco do 
Brasil. Com um colega tem uma empresa de processamento de dados e 
implantação de sistemas. 














ROM do sistema operacional 


SF800-FFFF - ROM DO SISTEMA OPERACIONAL 









$F800 ! PLOT ponto de coordenadas (Y,A) 
SF819 ! HLIN HI,B2 AT V - HL H2 em 82Ce Vem A 
SF828 | VLIN V1,U2 AT E - Vl vZ em $2De HemY 














sr832 pagina grafica xa resolucao 
$F836 ! deixando as quatro linhas inferiores intactas 
sF847 826-27 o o do inicia da linha de numero À 


ixa resolucao - À entre 0 e 23) 
3 baixa resolucao corrente) 
cor de baixa resolucao numero A) 


(rotina usada em qgrafic: 
SFBSF ! COLOR 
SF864 | Faz COLOR=A (estabe 


















8P871 | em A a cor do ponto de baixa resolucao (Y,A) 
sP682 4 mbler 
sFBDO rucao apontada por $3A-3B 


IRQ - Vetor de interrupcao em 
for BRK, salva antes os registra- 











cuta PR$0, INGO, TEXT - Ve se 
ral atr. das posicoes 
a igual a segunda) - Pula 
for RESET do teclado - Se for 
bela de vetores em 53F0/S53F4, 
te' 1 buscando cartao 
ita para o slot corr 
rio da linguagem resi- 





SFA62 4 Iniciali 
e' RESET do teclado ou iniciali 
93F3 e S3F4 (a primeira EOR 43: 
para o vetor RESET 93F2) 

















alvos pela rotina SFF4A 





ostra os registradore! 
linha 





de inicializacao em SFBO9) 
















SFBIE 1! Y leitura do pad entre O e 255) 
SEB2F |! HOME e TEXT 

SFB39 ! Rotina TEXT 

SFBIC ! So volta as margens originais 

SFB4O ! Rotina GR 

SFBSB ! UTAB À (A entre O e 23) 

SFB60 4 inicial 

SFB6F 4 o 

SFB7S 1 A - Reconhece CTRL-S 
SEB97 4 do modo ESC 

SEBCI ! $28-29 o endereco inicial da linha A do video 


(A entre 0 e 23) 
SFBDD ! Da um bip no alto-falante 
SFBFO ! Poe no video o byte contido em À e avanca o cursor 
SFBF4 | Avanca cursor uma posicao 
RINTa o caracter contido em À 














modo normal - Aceita carac- 









$FC2C 4 Interpreta caracteres no medo ESC 

SFC42 ! Apaga a tela do cursor em diante 

SFC46 ! Idem a partir da linha A, coluna Y (ambos comecam em 0) 
SFC5B * HOME 

SFC62 ! Pula para o início da proxima linha (CTRL-M ou <RETURND) 
SFC66 ! Desce uma linha (CTRL-J) 

SFC70 ! Da scroll de uma linha na tela 

SFC9C |! Apaga linha do cursor em diante 


SFC9E ! Idem, porem da posicao Y em diante 
SFCAB ! DELAY - Para o computador por um tempo igual a: 


2 
5% (S%A + Z7%A + 26 ) microsegundos 


Enta formula inclui o tempo Lomado pela instrucao JSR SECAS 
SFCBA 4 Rotina usada pelo monitor mbler 
SFCC9 4 Rotinas usadas na gravacao em fita 
SFCEC 4 Rotinas usadas na leitura tita 
SFDOC ! Liga cursor e espera tecla ser acionada (ou entr. 
pelo slot definido no ultimo comando IN4) - Volta 
SFDIB 4 Rotina original do teclado - Espera 
incrementa a anto - Apaga cursor 
SFD3I5 ! Mesma coisa que SFDOC, por 
SFD67 ! Pula uma linha, PRINTA caracter contido em $33, entra linha 
de ate 255 caractes pelo teclado (ou slot definido pelo ultimo 























IN4) - Volta a linha no buffer de teclado e a extensao em X 
SFDGA | Idem, porem sem pular linha 
SFD6F ! Mesma coisa, porem sem PRINTar o cai contido em 833 







SFDSB ! Apaga resto da linha do cursor e pul a seguinte 

SFD92 4 PRINTA endereco para listagem em hex: 

SFD99 ! PRINTA conteudo de YX em hex: 

SFDB3 ! PRINTa em hexa bloco de memoria cujos inicio e fim 
83C-3D e $3E-3F 

SFDC6 4 Rotina do monitor assembler 

SFDDA ! PRINTA em hexa o conteudo de A 

SFDED ! PRINTA caracter contido em À no video (ou slot selecionado 
pelo ultimo PR$) 

SFDFO ! Rotina original de video - PRINTa caracter contido em A 
Aceita modos NORMAL e INVERSE 









SPEOO-FF3E - Rotinas de interpretacao de comandos do monitor a 


SFEL8 4 Comandos +,-,: e . 

SFE20 4 Comando < 

SFE2C ! Comando M - Transfere 
início, fim e "novo início! 
"novo inicio” e' a posicao ond 
apos ter sido transferido, 

SFE36 ! Comando V - Compara bloco de oria cujos enderecos de ínicio 
e fim estao em 83C-3D e $3E-3F com outro bloco comecado 842-43 
- Imprime endereco e byte do primeiro bloco seguido do byte do 
segundo quando encontra discrepancia - Entrar com Y=0 

SFESE 4 Comando L 

SFE61 ! Lista 20 instrucoes disassembladas, comecando pelo endereco 
contido em $3A-3B 

SPE63 ! Id 


oria cujos enderecos de 

3D, 83E-3F e 942-43 - O 
o bloco de 
o início. Ent 



















porem À instrucoes 





de contro. SFESO ! Comando I 
SFCIO ! Volta o cursor uma posicao (se nao estiver na primeira ponicao SFE84 ! Comando N 
da primeira linha) SFES9 | Executa INSO 
SFCIA ! Sobe o cursor uma línha (se nao estiver na primeira linha) SFESB |! Executa INGA a 
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TRES MODENS EM UM 





(MULTEMODEM) -., 





DIGITUS E) 
- TEL. 


DADOS 


300/A Jojo) 1200 75 


MULTI-MODEM DIGITUS 


O MULTI-MODEM foi projetado pela DIGITUS 
para atender aos usuários de microcomputado- 
res que utilizam qualquer tipo de comunicação 
com transmissão e recepção de dados assiín- 
cronos seriais. 


A principal característica do MULTI MODEM é 
operar com três velocidades em um único mo- 
dem, ou seja são três modens em um. 


Usando qualquer microcomputador, desde que 
possua uma RS-232, você terá acesso a todos 
os sistemas de informações que utilizam as ve- 
locidades de 300 bauds Full-duplex, 1200 bauds 
Half-duplex e 1200/75 bauds Full-duplex. 


O MULTI-MODEM, fabricado pela DIGITUS, tem 
além das várias vantagens que o tornam um 
modem versátil, prático e de fácil utilização, a 
garantia da tecnologia DIGITUS. 


di) 


KR TTOETT 1 
EN LILLIL IS 


Matriz: Rua Gávea, 150 - Jardim América - Fone: (031) 332.8300 - Telex: 3352 - 30000 - Belo Horizonte - MG 
Filiais: Rua Barata Ribeiro, 391 - Sl. 404 - Copacabana - Fone: (021) 257.2960 - 22040 - Rio de Janeiro - RJ 
Rua Faxina, 47 - Centro - Fone: (011) 572.0137 - 04008 - São Paulo - SP 





ATiI-Produção 


B5==355 BS SºSSLeSBESEESS 


Grupo ED 


INB, (Cc) 121 
OUT (C)B 122 ADC HL,SP 
SBCHL,BC 123 LD SP,(dd) 
LD (dd), BC 160 LDI 
NEG 161 CPI 
RETN 162 INI 
IMO 163 OUT! 
LDI,A 168 LDD 
INCÍC) 169 CPD 
OUTÍC,C 170 IND 
ADCHLBC 171 OUTD 
LDBCdd) 176 LDIR 
RETI 177 CPIR 
LDR,A INIR 
IND,(C) OTIR 
OUT (C),D LDDR 
SBC HL,DE CPDR 
LD (dd), DE INDR 
IM 1 OTDR 
LDA 

IN Ec) 

OUT (C),E 

ADC HL,DE 

LD DE (dd) 

IM 2 

LDAR 

IN Hi(c) 

OUT (C),H 

SBC HL,HL 

LD (dd), HL 

RRD 

IN L(C) 

OUT (C),L 

ADCHLHL 

LD HL (dd) 

RLD 

SBC HL,SP 

LD (dd) SP 

IN ALCÍ 


OUT (C),A 





Grupo FD 


ADD Iv, BC 
ADD |Y,DE 
LD Yi dd 
LD (dd), Y1 
INC IY 
ADD YI,YI 
LD Yi (dd) 
DEC |Y 

INC (Iv +d) 
DEC (Iy+d) 
LD (lv+d),d 
ADD Iy,SP 
LD B,(IY+d) 
LD Ciy+d) 
LD D,(iv+d) 
LD E(iy+d) 
LD E(iy+d) 
LD Li(iv+d) 
LD (ly+d),B 
LD (Iy+dl,D 
LD (Iv +d),C 
LD (Iv+d),E 
LD (Iv+d),H 
LD (Iy+d),L 
LD (IY+d),A 
LDA, (IY+d) 
ADD (lv +d) 
ADC (ly +d) 
SUB (| +d) 
SBC (Iy+d) 
AND (Iy+d) 
XOR (Iv +d) 
OR (Iy+d) 
CP (Iy+d) 
POP Iy 

EX (SP), Iv 
PUSH IY 

JP (Iv) 
LDSP, IY 





Grupo DD CB 


RLC (IX+d) 
RRC (IX+d) 
RL (IX+d) 
RR (IX+d) 
SLA (IX+d) 
SRA (IX+d) 
SAL (IX+d) 
BIT O,(IX+d) 
BIT 1(IX+d) 
BIT 2,(1X+d) 
BIT 3,(1X+d) 
BIT 4(IX+d) 
BIT 5,(IX+d) 
BIT 6.(1X+d) 
BIT 7, (IX+d) 
RES 0,(IX+d) 
RES 1,(IX+d) 
RES 2,(IX+d) 
RES 3,(IX+d) 
RES 4,(IX+d) 
RES 5,(IX+d) 
RES 6,(1X+d) 
RES 7, (IX+d) 
SET O,(IX+d) 
SET 1,(1X+d) 
SET 2,(1X+d) 
SET 3,(IX+d) 
SET 4,(IX+d) 
SET 5,(IX+d) 
SET 6,(IX+d) 
SET 7,(IX+d) 


Grupo FD CB 


RLC (IY+d) 
RAC (Iv+d) 
RL (IY+d) 
RR (ly+d) 
SLA (ly+d) 
SRA (IY+d) 
SAL (ly +d) 
BIT OliY+d) 
BIT 1llV+d) 
BIT 2 (lv+d) 
BIT 3, (Iv +d) 
BIT 4(lv+d) 
BIT S,llv+d) 
BIT 6 y+d) 
BIT 7ly+d) 
RES O,(lv+d) 
RES 1,(IY+d) 
RES Zllv+d) 
RES 3 (Iv +d) 
RES 4, (lv +d) 
RES 5, (lv +d) 
RES 6,(lv+d) 
RES 7,(Iv+d) 
SET O,(IY+d) 
SET 1,(lY+d) 
SET 2/(Iv +d) 
SET 3,(IY+d) 
SET 4,(Iv+d) 
SET S.(IY+d) 
SET 6,(1Y+d) 
SET 7,(Iv+d) 


Grupo DD 


ADD IX,BC 
ADD IX,DE 
LD IX,dd 
LD (dd), 1X 
INC IX 
ADD IX,IX 
LD IX, (dd) 
DEC IX 

INC (IX+d) 
DEC (IX+d) 
LD (IX+dl d 
ADD IX,SÊ 
LD B,(IX+d) 
LD C(IX+d) 
LD D,(IX+d) 
LD E,(IX+d) 
LD Li(iX+d) 
LO (IX+d),B 
LO (IX+d),C 
LO (IX+d),D 
LD (IX+d),E 
LO (IX +d),H 
LD (IX+d),L 
LD (IX+d),A 
LD A,(IX+d) 
ADD (IX+d) 
ADC (IX+d) 
SUB (IX+d) 
SBC (IX+d) 
AND (IX+d) 
XOR (IX+d) 
OR (IX+d) 
CP (IX+d) 
POP IX 

EX (SPJIX 
PUSH IX 

JP (1X) 

LD SP,IX 


A JOTEC CONSULTORIA E SISTEMAS 
TEM A SOLUÇÃO PROFISSIONAL 
PARA A SUA EMPRESA. 


CPM IBM-PC 
e compatíveis e compatíveis 

(8 bits) ORTN's (16 bits) ORTN's 
Contabilidade 63 70 
Folha de Pagamento + e 85 
Ficha Financeira 
Estoque 43 45 
Faturamento + Estoque + 
Controle de Recebimentos 
Controle de Recebimentos 53 
Controle de Recebimentos + 70 
Cheques 
Controle de Pagamentos 53 
Controle de Recebimentos 
& Pagamentos so 
Controle Bancário 10 
Mala Direta 29 
Locação de Imóveis 90 
Distribuidoras & Atacadistas 400 









































“ ELABORAMOS PROGRAMAS ESPECÍFICOS 
CURSOS: Basic |, Basic Il, Basic III, Lógica Estruturada, 
Cobol, Análise de Sistemas. 


Consulte nossos analistas para maiores informações. 


«FER TREK: Fone: (011) 240-1682 


Rua Otavio Tarquinio de Souza, 609 - Campo Belo 
São Paulo - SP -CEP 04613 


GARANTA 
SUA MS 


TODO MÊS! 


Se você deseja assinar MICRO SISTEMAS, preencha o 
cupom abaixo (ou uma xerox, caso você não queira 
cortar a revista): 


Q 
$ 


nome 








empresa. 


profissão/cargo. 





endereço para remessa 





cidade. estado. 





Assinatura anual 


Micro Sistemas Cr$ 79 000 


GRATIS! 6 MEROS ATRASA 





Preencha um cheque nominal à ATI Editora Ltda e envie 
para: 

Av. Presidente Wilson, 165/grupo 1210, Centro, Rio de 
Janeiro, RJ, CEP 20030 - Tel. (021) 2626306 

R Oliveira Dias, 153, Jardim Paulista, São Paulo, SP, CEP 
01433 - tels.: (011) 853-7758, 881-5668 e 853-3800. 
Seu recibo será enviado pelo correio. 








APPLE: O MAPA DA ROM (Ill) 






Numero do slot em $3E 






























Comando CTRL-K 

Executa PRO 

Executa PR$A 

Comando CTRL-P 

Comando CTRL-B 

Comando CTRL-C 

+ Comando G 

SFEB9 | Volta registradores salvos pela rotina SFF4A e salta para o 
endereco contido em S3A-3B 

SFEBF ! Comando CTRL-E 

SFECA | Comando CTRL-Y 

SFECD ! Comando W - Grava na fita bloco de memoria cujos enderecos de 

início e fim estao 

SFEF6 4 Comando <RETURN> 

SFEFD ! Comando R - Le do gravador bloco de dados que sera armazenado 
entre om enderecos de inicio e fim contidos nas pomicoes 83C-3D e 
83E-3F - PRINTa “ERR” me houver erro na leitura ou o bloco gravado 
nao for do tamanho correto 

SFFJA | Manda CHR9(7) para o vídeo ou slot selecionado pelo ultimo 
PR$ (toca bip no altofalante me for para o vid 

SFF3F | Rentaura registrador: 

SFF4A |" Salva registradores A,X.Y,P e S nas posico: 

SFF59 4 Sequencia da rotina BRK - Executa NORMAL, HOME, PR6O e INSO e 
entra no monitor assembler 

SFF69 | Entrada do monitor 





Numero do slot em $3E 
Cuidado! Apaga o programa em BASIC! 
So volta ao BASIC 






























embler - PRINTa "*" e espera linha de 
comandos - Le valor digitado no início da li e achar cter 
de comando - Deixa o valor em 33E-3F - Interpreta o caracter de 
comando (toca bip e volta a SFF69 se o comando for invalido) 

SFFA7 ! CONVHEX - Le valor hexa comecado em 8200+Y - Deixa resultado 

e a pomicao 831 for <> O, tambem em 83C-3D « 840-41 

execucao de comandos do monitor 

Je comandos do monitor mb) 

interrupcao NMI - 803] 

- Vetor de inicializacao geral - SFA62 

- Vetor de interrupcao IRQ e da instrucao BRK 





















80000-07FF - MEMORIA DO SISTEMA 


80000-00FF - VARIAVEIS DO SISTEMA 

800-02 à Instrucao JMP $D43C (JMP READY) 

803-05 % Instrucao JMP SDB3A (JMP PRINTLIN) 

506-09 - Sem uso 

SOA-0C t JMP da USR - Endereco da rotina em $0B-0C 
S0D-10 à Diversos usos 

qua Tipo do valor contido 


AcsoFTI 


BUSQUAR 
Flag usada INPUT/GET/READ 
Codigo da comparacao 
Sem uso 
rotinas de alta resolucao 


squerda da janela de texto (de O a 39) 


superior da janela de texto (de O a 23) 
inferior da janela de texto (de O a 23) 
io horizontal do cursor (de O a 39) 
vertical do cursor (de O a 23) 
graficos 
Endereco do inicio da línha em que esta o cursor 
na rotina de scroll 
em HLIN e VLIN 
no monitor assembler 
COLOR - Cor corrente baixa resolucao 
Usada no monitoi 
Modo de impressao (usada em conjunto com $F3): NORMAL=255, 
INVERSE=63, FLASH=127 
Caracter do “prompt” durante a entrada de linha 
Usada no monitor bler 
Usada na rotina de vídeo 
o da rotina de saida (originalmente SFDFO) 
ntrada (orininalmente SFDIB) 
ibler 
os valores dos registradores A,X.Y.P e 3 apos a 
execucao da rotina SFF4N 
Sem us 
Semente aleatoria do monitor - Nao usada pelo BASIC 
Diver! um 
Apon! 
Aponta ultimo DESCR entrado na PILHAS (854 e 
PILHAS 
Diversos usos 
INIPROG - Início do programa em BASIC 
INIVARS - Início das variaveis simpl 
INIMATR - Início d 
INISTR - Início do 
Aponta início da parte ja ocupada do espaco string 
Endereco do espaco reservado pela rotina RESERVES 
HIMEM - Ultima posicao disponível da RAM 
NUMLIN - Numero da linha atualmente sob interpretacao 
Numero da ultima linha END/STOP 
Endereco da instrucao atualmente sob interpretacao 
Numero da linha do ultimo DATA lido 
Endereco do proximo dado a ser lido em comandos DATA 
Usad, GET/READ/INPUT 
Nome da variavel 


Porrrrrene mim ppp pos 1 as 


resmas 


em GET/READ/INPUT 
RESEXPR 
usos 
remanejamento da memoria string 
usos 


rrrrrorr enem uma 


ACSPFI (bit 7 setado para valore: 
Diversos usos 
ACSOFTZ 
Sinal do ACSPF2Z (como acima) 


negativos) 
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Byte extra do ACSPF2 - Usado para maior precisao 
Byte extra do ACSPFl (como acima) 
Divernos usos 
Primeira posicao livre apos o progr 
Rotina PROXCAR 
Rotina PEGCAR 
PTRLIN 

nte aleatoria do BASIC 


(LOMEM inicial) 


rotinas de alta r 
Flag de programa protegido - Ponha aqui 
10r que 127 dentro de meu programa e ele nao podera mais 
r xeretado, pois apos isso todos os comandos diretos 
rao interpretados como RUN 
Sem uno 
FLAGONERR - ONERR ativo se SD8 > 127 


inipulacao de erros quando ONERR esta ativo 
ULTIMOX - Coordenada horizontal do ultimo ponto HPLOTado 
ULTIMOY - Coordenada vertical do ultimo ponto HPLOTado 
Sem uso 
HCOLOR - Cor corrente de alta resolucao 
Usada em graficos di 
MSB da pagina grafica de alta resolucao corrente 
SCALE - Valot do ultimo SCALE executado 
Endereco da ultima tabela de formas SHLOADada 
Usada em graficos de alta resolucao 
uso 
s usos 
Valor do ultimo SPEED executado 
FLAGTRACE - TRACE ligado se SF2 > 127 
Modo de impressao (usada em conjunto com 832): FLASH=-64, 
NORMAL / INVERSE=00 
Usadas por ONERR 
srs SATUAL - Valor de S no início da instrucao 
sE9 ROT - Valor do ultimo ROT executado 
SFA-FE - Sem uso 
$00PF-010F - BUFFER USADO EM TRADDEC 
$0110-01FF - PILHA DO SISTEMA E DO BASIC 
80200-02FF - BUFFER DO TECLADO 
80300-03FF - AREA DE VETORES 
$300-3EF - Livre para o usuario (se o DOS nao estiver presente) 
$3F0-3F1 - Endereco da rotina do BRK (vetor BRK) 
$3F2-3F3 - Endereco da rotina RESET (vetor RESET) 
s3Fa Senha RESET-teclado 
$3F5-3F6 - Endereco do comando & do BASIC 
83F7 Nada 
$3F8-3F9 - Endereco do comando CTRL-Y do monitor assembler 
S3FA Nad. 
$3FB-3FC - Endereco da interrupcao NMI (vetor NMI) 
$3ED - Nada 
S3FE-3FF - Endereco da interrupcao IRQ (vetor IRQ) 
$400-7FF - MEMORIA DE VIDEO 


$0800-BFFF - AREA USADA PELO BASIC 


sES 
SE6 
SE7 
SEB-E9 
SEA 
SEB-EF 
SEO 
sel 
seZ 
se3 


eunr iremos 1 us 11 


SE4-F7 


$0800-0BFF - Pagina 2 de baixa resolucao 
$2000-3FFF - Pagina 1 de alta resolucao 
$4000-SPFF - Pagina 2 de alta resolucao 


SCO00-CFFF - AREA DE ENTRADA/SAIDA 


Porta do teclado 

Habilita teclado a receber nova tecla 
Click no alto-falante 

Click no gravador 

Pulso no conector de jogos 


$co00-coor 
$c010-COLF 
$C020-C02F 
$c030-co3r 
8C040-C04F 
scoso 
8cos1 
scosz 
scos3 
scosa 
scoss 
scos6 
$c057 
scose 
scoso 
SCOSA 
scosB 
scosc 
scosD 
SCOSE 
scosr 
sco6o 
sco61 
8co62 
8c063 
sco6a 
sco6s 
8co66 
$c067 
8C068-C06F 
8C070-CO7F 
8C0B0-COBF 
8C090-CO9F 
SCOAO-COAF 
SCOBO-COBF 
$coco-cocr 
SCODO-CODF 
SCORO-CORF 
8COFO-COFF 
8C100-CIFF 
8C200-C2PF 
8C300-C3FF 
8C400-CA4FF 
8C500-CSFF slot 5 

8C600-C6FF slot 6 

8C700-C7FF lot 7 

SCB00-CFFF de uso comum para os 


SDO00-FFFF - ROMs 


SDO00-F7FF - INTERPRETADOR BASIC 
SF800-FFFF - SISTEMA OPERACIONAL 


Desliga a janela de 4 linhas de texto 

Liga a janela 

Seleciona pagina 1 

Seleciona pagina 2 
ciona baixa resolucao 
ciona alta resolucao 
iga ANO 

Liga ANO 

Desliga ANI 

Liga ANI 

Desliga ANZ 

Liga ANZ 

Desliga AN3 

Liga AN3 

Leitura do gravador 

Le Sul 

Le Sw2 

Le WI 

Le paddle 

Le paddle 

Le paddle 
paddle 

M que 8C060-5C067 

Dispara monoestaveis dos paddles 

slot O 


habitada” pelo slot 1 
slot 2 
slot 3 
slot 4 


ARO P PORCO OR RR O O O RR) 





53 








trs-80 trs-80 trs-80 trs-8 





Missão Impossível 





Ayrton Ribeiro da Costa Júnior 


Missão Impossível foi feito originalmente num DGT-100 
com 16Kb, versão cassete. Apresento, porém, duas versões 
para micros compatíveis com os modelos 1 e III, Pode tam- 
bém ser adaptado para o BASIC Disco, bastando, para isso, 
uma pequena modificação na linha 23 ae acordo com o siste- 
ma operacional. 

O programa apresenta uma rotina de erro que printa a pala- 
vra TILT. Se isso acontecer, por erro de digitação ou excesso 
de string, você deve voltar ao começo do jogo, recomeçando- 
o na medida do possível. 

Ao rodar O jogo, você verá que este possui uma parte com 
instruções resumidas. Após as instruções, virá a mensagem 
“Prepare-se” e, alguns segundos depois, você terá em seu visor 
um painel (veja figura 1) onde no quadro maior à esquerda 





Figura 1 


você verá o seu canhão laser, o navio inimigo e os setores divi- 
didos em quadrantes a serem defendidos. A direita, você verá 
um quadro. Na parte superior, o número de pontos, e mais 
abaixo, o número de vidas restantes; um radar de alerta (que 
acende o número do setor cujo 49 quadrante foi atacado, apa- 
gando se o navio inimigo for destruído), e o recorde do dia e 
o nome do jogador que o conquistou. 

No final de cada partida será mostrado seu número total de 
pontos, de tiros certos e errados, além do percentual de acerto. 
Caso seus pontos sejam um dos cinco maiores, você poderá 
colocar seu nome ou iniciais e admirá-lo na galeria dos “Me- 
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TETE 
CETTE 


Pyurton 








Voce quer jogar de novo (S/N)? 








Figura 2 


lhores do Dia” (figura 2) ou até mesmo no recorde do painel 
caso o seu placar tenha superado o antigo recorde. 


INSTRUÇÕES 


Você está a bordo de um submarino nuclear cuja missão é 
impedir que navios inimigos joguem bombas de profundidade 
e mudem de setor antes de você acertá-los, evitando explodir 
as bombas pois, do contrário, o quadrante não terá mais como 
ser recuperado e a marca referente à bomba não sumirá de sua 
tela, 

Quando o navio atacar um setor que já tem um quadrante 
destruído, seu alvo será o quadrante logo abaixo e assim su- 
cessivamente, até serem destruídas as quatro posições na ver- 
tical de qualquer um dos setores, restando apenas a sua destrui- 
ção ou a esperança de que o navio insista em atingir outro se- 
tor que não tenha sido destruído totalmente e você, enquanto 
isso, consiga mudar de fase. 

Existem quatro fases e você possui, de início, três vidas para 
enfrentá-las. Cada tiro certo vale 10 pontos, porém, o mesmo 
será cobrado por cada tiro errado. À cada duzentos pontos 
você muda de fase, com os navios se movimentando cada vez 
mais rápido. 

Após todas as fases terem sido ultrapassadas, você permane- 
ce na fase quatro até ceder ao inimigo, recebendo uma vida de 
bonus ou SO pontos, caso já possua as três vidas, cada vez que 
ultrapassá-la. Use as setas ( > ) e (<) para movimentar o ca- 


MICRO SISTEMAS, julho/85 








nhão, a barra de espaço para atirar e as setas ( 1 )Je( 4 )Jao 
31 PRINTO324,“Voce fez“sACs;“pontos, acertou“sOis"tiro(s) e errou 


mesmo tempo para abortar o jogo. “1023"."9459,"Seu percentual de acerto e" de “MMS; 
32 PRINTO5S93,“Para continuar « RETURN)“; 
33 P$=INKEYS:IFPS()CHRS(13),39ELSEBA 
DICAS 34 AYS="":PRINTA9O9, “Voce quer Jogar de novo (S/N) “5 
35 INPUTAYS 
5 e y 36 IFAYS="5“ORAYS="S", IOELSEIFAYS=“n“ORAYS="N”, NEVELSE3A 
O melhor método de digitação é bater o programa aos pou- 37 FORT=1TOSO:NEXTT:FORI=2T050:SS=USR (768+RND(1)):NEXTIZFORI=50 
' : : O2STEP-1:SS=USR(76B+I):NEXTI 
cos e ir gravando sempre para continuar mais tarde. Ao acabar 38 CLS 3 W=U+i * MO=UO-10 5 IF W0/15 , PRINT9337,“Voce passou pa 
de digitar, não se esqueça de gravar o programa antes de dar o : 


ra o nivel“;Mp”.” & GOTO 44 
“RUN”, e que para facilitar alguma possível correção deve ser |r aos inimigos. 











39 IFW=4,PRINTO323,“Agora voce permanecera” no nivel 4 ate” cede 
o desafio ainda continua.”s 


ELSEPRINTO321,“Voce conseguiu passar“ sW-4;"vez( 
retirado da linha 23 o POKE 16396,165 que trava o Break, re- | do oris 4 TEMA TFVISI VISUI MEL SEAC=AC+SO 
colocando-o após tudo estar correto. Após tudo ter sido feito, 45 PRANTOAAS BLQUA: T8/05R ME |ROBDAs PRAr a acOnEIDUnE: 6 METURN 
e se ainda restar coragem, reúna os amigos e descubra quem é 42 BS=INKEYS:IFBS=CHRSC(193), 17ELSE4Z 
o mais qualificado para enfrentar esta “Missão Impossível”. dO Conan e oa 
Tome cuidado e boa sorte. 


44 FORA=LTOLIIPOKELS4ALO+rA, LOSPOKELS6OD+HA, LSIPOKELS7P4A+HA, 1SEPOKES 
Missão Impossível (DGT-100) 





S922+A, 1SEPOKELGOSO+A, 152POKELGIOG+A, 21: NEXTA 

45 FORB=15475T01624ISTEP64:POKEB, 205:POKEB+12,210:NEXTE 

46 PRINTOLS9, “PONTOS” ;D1B3,AC;9I11, VIDAS” 19376, STRINGSCVI,149)7 
2500,"A L E RT A“59756,” RECORDE “;9822,HNS(1):9886,HGSC1)5 
47 FORA=0TO74BSTEPI92 














. 48 FORB=15426+ATO15472+ASTEP2 
RT) 1984 - MISSAO IMPOSSIVEL numa 49 POKEB, 1S:NEXTB, A 

2" umau FEITO POR AYRTON RIBEIRO DA COSTA JUNIOR nm 50 FORA=OTOSOSTEPIO 

3 " WuHH PARA MICROS COMPATIVEIS COM TRSBO MODELO 1 anna Sí FORB=1S424+ATOL6222+ASTEP64 
4 AX=32738:CLS:GOSUB2I1ONERRORGOTO19 52 POKEB,208:NEXTB,A 

5 GOSUB2LICLSIPRINTTAB(L3)! MISEAO IMPOSSIVEL 53 PRINTO9OO,N1$:9963,N2$) 








RING$(11,131);” “;STRINGS(19,131 


RINTTAB(14) 53 PRINTO900, 3 
Voce quer instrucoes (S/N) * 54 PI=RND(S)-1:PD=PI+1 


é MRsEraasas voce ENE SS PRINTOPINLO4L,NIS; 
1 N' ie 56 IFNCPD)C4,DD=15360+M(PD)+1920(N(PD)+1) 3 POKEDD, 188:SS=USR(456) 





















44 NIS=STRINGS(3,176)+CHR$(190)+CHR$C188)+STRINGS(4, 176) 2A1$=STR 
INGS(9,” 

15 NIS=CHR$(160)+CHRSC180) ENZS=CHR$ (184) +CHR$(190)+CHR$(190)+CHR 
S(188)+CHR$C144) 

16 ALS=STRINGS(2,” “)2A2S=STRINGS(S,” “)26TS=CHR$(128)+CHR$(161) 
+CHR$(160)+CHR$(134)+CHR$(131)+CHR$(197)+CHR$(144)+CHR$C146)+CHR 
sc128) 

47 CLSIFORT=1TOSEMCTI=(T-1)010+2:NC(T)=0:NEXTTIPA=O 

18 PRINTCHRS(23):PRINTO4SB,P REPARE -S E“sIFORT=1TOSOO:NE 
XTTECLS:G0TOA3 

19 CLS:PRINTCHRS(23):PRINTO40B,"T 1 L T“;2FORT=1T0100:S5=USR(128 
0O+RND(50)):SS=USR(12800+20-RND(10)) :NEXTTERESUMES 

20 PP=628+(24PI):PRINTOPP, STR$CPI+1); 3 RETURN 

24 CLSSPRINTCHR$(23)3PRINTSTRINGS(31,H)2PRINTEPRINTTAB(7)“MISS 
AO IMPOSSIVEL “:PRINTEPRINTSTRINGS (34, “H”) PRINTOSI4, “FEITO POR”; 
D648,“AYRTON R. COSTA JUNIOR":9790,"P — 1984"; 

22 FORT=1T02000:NEXTT:RETURN 

23 N=VARPTR(AZ) EPOKEL6526, PEEK(N) :POKE 16527, PEEK(N+1) 2POKE16396, 
165 

24 FORI=AXTOAX+2Z 

25 READY3POKEI, YINEXTISRETURN 

26 DATA 205,127,10,203,36,69,62,1,211,255,16,254,69,62,2,211,255 
+16,254,37,32,239,204 

27 FORT=0TOSOSTEP1O:FORI=277T0267STEP-12SS=USR(I+T):NEXTI, TSRETU 
RN 

28 FORT=1T0150:5S=USR(2590+T) :POKE(15359+RND(1024)),134:FORU=ITO 
S:NEXTU, TIFORU=SOTOZSTEP-1 :SS=USR (5120+U) :NEXTU 

29 CLS:IFVIDO,PRINTAII6, “Agora voce so! tem";VIsvida(s).” 
ALELSEPRINTAZO7, “Sinto, mas acabaram as vidas.”; 

36 1FOS>0,HMS=LEFTSC(STR$((014100)/(01+02)),5)+” XVELSEHHS=" 0.0 














Boro 








8 IFIS="S"0RIS="s”,GOSUBLO7ELSES 3IFN(PD)=3, GOSUB20ELSES7ELSEVI=VI-1 :G0T028 
9 CLEARZ00:RANDOMEDIMM(S) NS), HNSC6) ,HOS (6), HHSC6) HOSC1)="Ayrt 57 GOSUB 63 RRESA MRE VA 

on“ FHNS(1)=" 0000 58 NCPD)=N(PD)+1 

10 AC=0:01=0:02 2WO=4S:VI=3 59 PRINTOPINi0+1,AIS;:GOTOSA 

44 IFHMS(1)C)"”,47 40 POKEDD, 126: IFN(PD)=3,POKE15I61+PP, 128 
12 ONERRORGOTO19 61 GoToss 

13 * Variaveis 62 * POSICAO ALIADO 





63 FORY=1TOWO!X=PEEK (14400) 

64 1FX=0,71ELSEIFX=24,104 

65 1FX=32,PC=PAIPA=PA-10:FORT=1TO10:NEXTT :G0TO6B 

66 IFX=64,PC=PAIPA=PA+10ZFORT=1TOLO:NEXTT:GOTOGE 

67 1FX=128,GOSUB72:RETURN 

68 IFPA(GORPAD4O, PA=PL 

69 PRINTIPOO+PC,ALSFAP6I+PC,ADS; 

70 PRINTOSOO+PA,NIS;AP6I4PA, NOS; 

74 NEXTY3RETURN 

72 " Tiro 

73 FORC=16261+PATOSSI6S4PASTEP-64 

74 POKEC,133 

75 SS=USR(RND(20)+1292) 

76 POKEC, 128:POKELG261+PA, 180 

77 NEXTC 

78 IFPI%10+1=C-15300,PRINTOPIN1O+1,GTS; AC=AC+10:04=01+1:PRINTOL 

B3,AC; :GOSUB27: IFAC/W=200, 37ELSEGOTOGO 

79 02=02+12:TFAC>0,AC=AC-10:PRINTOL83,AC; 

80 RETURN 

Bt * Entrada no high-score 

82 IFHMS(1)="“ANDAC)O,HOS(1)="“2HNS(1)=7" 

83 CLS:66=0:ET$="":FORC=iTOS 

84 IFAC)VAL(HNS(C)),86 

85 NEXTC:GOTOL00 

B6 PRINTCHRS(23):PRINTTAB(6)P A RA BENS 1”, TABCS)STRINGSCL 

5, CHR$(131)):PRINTO208,“Seu escore e'”,“um dos 5 maiores do dia. 
' 

87 PRINT/Favor colocar seu nome du apenas suas iniciais e apert 

ar « RETURN ).”; . 





BB POKE16012,2PRINTA6SB,"- — — — — — dá 
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B9 H$=INKEYS:IFM$="“ANDGG(24, PRINTOS94+06, CHR$(176)p 3FORT=1TOSEN 
EXTTIPRINTAS94+GG,” *;:GOTOBPELSELFHS=CHR$(13), P2ELSELFHS=CHRSCO 
YANDGG)0, PRINTOSP4+66,” “3 3ETS=LEFTSCETS, (60/4-1)):00=06-42G0T08 
9? 

90 IFGG=24, G9ELSEPRINTAS94+06, M$; :00=06+4:ETE=ETS+HS:GOTOBP 

91 * Troca 

92 HNSC6) =STRSCAC) SHOS (6) =ETSEHHSC6)=HHS 

93 M1=0:FORB=CTOS 

94 IFVALCHNSCB))CVALCHNSCB+1)), GOSUB97 

95 IFH120,93 
96 NEXTB2G0TOL 
97 MIS=HNSCO) EM2S=HOS CB) EMISEHAS CB) 

98 HNSCB)SHNS(B+1):HOSC(B)=HOS(B+1) 2HHSCB)=HHSCB+1) 

99 HNSCB+L)SMISIHOS CBL) =M2SEHNS (D+) =H9SEMi=4 RETURN 

* Quadro do high-score 
CLSIFORA=1SI4STOL6192STEPL28:FORB=ATOA+522POKEB, 152NEXTE A 
102 FORA=15364TOL6132S5TEP64:POKEA, 2107POKEA+23,208:POKEA+I6, 2081 














POKEA+54, 205: NEXTA f 
103 PRINTA71,70S MELHORES DO DIA“;895, “PONTOS” 48106, "MEDIA DE AC 
ERTO”s 


FORB=1TOStA=BNiza 

PRINTOZ7+A,HOS(B) FaPS+A,HNS(B) DLOS+A,HNSCB) E 

106 NEXTB:GOTOIA 

107 * Instrucoes 

PRINTOL39,"0 seu objetivo e impedir que o navio inímigo, ocu 

e os quadra com ( “sCHR$(143)7” ) ate chegar a voce. Se oc 

upado, voce tem que acertar o navio antes que O mesmo mude de se 

tor, “3 

109 PRINT“pois do con-trario nao havera como recuperar o quadran 

te.“:PRINTTAB(11)“Voce tem 3 vidas e 4 níveis para Jogar. Cada t 
iro “5 

4110 PRINT'va-le 10 pontos a serem somados ou dimíniuidos do seu 

escore depen-dendo apenas de sua pontaria e a cada 200 pontos vo 

ce muda dos, você permanec 

era no nível 4 ate ceder ao inimigo, 

1141 PRINT"E a cada vez que ultr nivel, recebera uma 

vida de bonus, ou 58 pontos caso ja possua 3.7:PRINTTAB(L1)“Use 

€ "SCHRS(93)3” ) e ( “FCHR$(94)5” ) para mover seu canhao, a bar 

ra de espaco para atirar e ( “;CHR$(94)4” DC “5CHR$(92)7 

41142 PRINT” ) para abortar o jogo.":PRINTTAB(2L)"B O A SORTE 
1aPRINTTAB(48)“Para continuar < RETURN )“s 

143 AS=INKEYSIIFASC)CHR$(13), 113ELSERETURN 





10 























ni-vel. Apos todos serem ultrapa 














Missão Impossível (CP-500) 





1" unma 1984 - MISSAO IMPOSSIVEL numa 
2 numa FEITO POR AYRTON RIBEIRO DA COSTA JUNIOR nnmm 
3 * WNHH PARA MICROS COMPATIVEIS COM TRSBO MODELO III MNNH 
4 AX=32739:CLS:GOSUB2I:ONERRORGOTOL9 

5 GOSUBZLICLSIPRINTTAB(L3)” MI SSAO IMPOSSIVEL ap 
RINTTAB(14)STRINGS(11,191)57 “sSTRINGS(19,191)p 

é PRINTO4S2, “Voce quer instrucoes ( 8 / N) “rEINPUTIS 

7 1FIS="NºORIS="n”,9 

8 IFIS="S“0RIS="s”,GOSUB107ELSE6 

9 CLEARZOOFRANDOM:DIMMCS) NCS) HNSC6) HOSC6) HS (6) EHOS (1) =" Ayrt 
on“ 2HN$(1)=” ” 
16 AC=0:01 2W=4 :MO=4SIVI=3 

44 IFHNSCL) 7,47 

42 ONERRORGOTOS9 

13 " Variaveis 

44 NIS=STRINOS(3, 176) +CHR$(190)+CHRS (108) +STRINOS (4,176) 3AIS=STR 
INGSC9,” *) 

45 NIS=CHRS(160)+CHRS(180) IN2S=CHRS (184) +CHRS(190) +CHRSC19O)+CHR 
SC188)+CHR$(144) 

16 ALS=STRINOS(2,” “) ADS=STRINGSCS,” “)2GTS=CHR$(128)+CHRSC161) 
+CHR$(160)+CHR$(134)+CHR$(134)+CHR$C197)+CHR$(144)+CHR$(146)+CHR 
s(126) 

47 CLSIFORT=STOSENCTI=(T-1)810+2ENCT)=0ENEXTTEPA=O 

18 PRINTCHRS(23):PRINTO4ASO,P REPARE -S E“rIFORT=ITOSOONE 
XTTECLSIGOTOAI 

49 CLSIPRINTCHRS(23) :PRINTO40B,T I LT"; sFORT=1TOL00!SS=USR (128 
+RND (50) ) 1SS=USR (12800+20-RND(10)) :NEXTTERESUMES 

20 PP=á28+(20PI)SPRINTOPP,STRSCPI+4)5SRETURN 

24 CLSIPRINTCHRS(23) PRINTSTRINOS(34,“H7)2PRINTEPRINTTAB(7)"HISS 
AO IMPOSSIVEL” :PRINTIPRINTSTRINGS(34 ,“H”) EPRINTOSIA, “FEITO POR”S 
2648," AYRTON R. COSTA JUNIOR“19790,"P — 198474 

22 FORT=1T020004NEXTTERETURN 

23 N=VARPTR (AX) 1POKEL6526, PEEK CN) EPOKEL6527, PEEKCN+1):POKEL6396, 
165 

24 FORI=AXTOAX+20 

25 READYIPOKEI, YINEXTISRETURN 

26 DATA 205,127,10,203,36,69,62,1,211,255,16,254,69,62,2,211,255 
+16,254,97,32,239,204 

27 FORT=OTOSOSTEPIO!FORI=277T0267STEP-129S=USRCI+T):NEXTI, TARETU 
RN 
28 FORT=1TOLSOLSS=USR(1900+T) :POKE(15I59+RND(1024)),2385FORU=ITO 
SI NEXTU, TEFORU=50TOZSTEP-1 :SS=USR (2560+U) ENEXTU 

29 CLStIFVI)O,PRINTO3I6, “Agora voce so” tem";VIs"vida(s).“EGOTO 
ALELSEPRINTOZO7, “Sinto, mas acab s vidas.”s 

30 1FO1)0,HHS=LEFTSCSTRS((010100)/(01+02)),5)+" X"ELSEHMS=” 
rd 

34 PRINTOI2A, “Voce Fez" sACy “pontos, acertou”sOLp”tiro(s) e errou 
“1025".”18459,"Seu percentual de acerto e” de “sHH$; 

32 PRINTOS93, “Para continuar ( ENTER )“p 

33 PS=INKEYSIIFPSC)CHR$(13),I9ELSEBA 

34 AYS=""1PRINTA9O9, “Voce quer jogar de novo (S/N) “5 

35 INPUTAYS 

36 IFAYS="5"0RAYS="8", LOELSEIFAYS=“n“ORAYS="N”, NEMELSEI4 

37 FORT=ITOSO:NEXTTIFORI=2T050:SS=USR (7680+RND(I) ) :NEXTIZFORI=50 
TOZSTEP-1 :SS=USR(7680+1)ENEXTI 

38 CLS 1 W=lWti + WO=WO-10 2 IF M0)15 , PRINTO3I7, “Voce passou pa 
ra o nivel”sWs”.” 3 GOTO 44 


























































39 IFU=4,PRINTO323, “Agora voce permanecera” no nivel 4 ate” cede 
r aos inimigos.” ;ELSEPRINTO32L, “Voce conseguiu passar” ;U-4s"vez( 
es), mas o desafio ainda continua.” 

40 WO=15 1 IFW>A, IFUIC3, VI=VI+ELSEAC=AC+50 

41 PRINTO469,B 0 A SORTE 1“59594,Para continuar < ENTER » 
“ 

42 BS=INKEYS:IFES=CHR$(13),17ELSE42 

43 " Matriz 5x4 

44 FORASITOLIZPOKELSALOMA, 140: POKELS6O24A, 140 :POKELS79A+A, 140:PO 
KELS922+A, 1403 POKELGOSO+A, L4OFPOKELGI06+A, 131 ENEXTA 

45 FORB=15475TO14243STEP64IPOKEB, 149:POKEB+12,170:NEXTEIPOKELSAL 
1,156:POKE15423,172 

46 PRINTOL18, “PONTOS”; 9182,AC;AILA, VIDAS” FA500,VA L E RT A”97 
56,” RECORDE “99822,HNS(1)79886,HOS(1);2FORT=1TOVISPOKESS7IS+T 
+ 2532 NEXTT 

47 FORA=OTOZ6BSTEPL92 

48 FORB=1S426+ATOL5472+ASTEPZ 

49 POKEB, ASENEXTE, A 

5º FORA=OTOSOSTEPIO 

51 FORB=15424+ATOL6222+ASTEP SA 

S2 POKEB,2:NEXTB,A 

53 PRINTO9OO,N1$:0963,N2S; 

54 PI=RNDC(S)-12PD=PI+i 

55 PRINTAPISS0+S,NIS; 

S6 IFN(PD)(4,DD=15360+N(PD)+1928(NCPD)+4) 2POKEDD, 238:SS=USR (456) 
21FN(PD)=3, GOSUB20ELSES7ELSEVI=VI-1:G0TO28 

s7 Gosue 63 

58 NCPD)=NCPD)+1 

59 PRINTOPINLOsL,AIS: EGOTOSA 

60 POKEDO, 1287 IFN(PD)=3,POKE1S361+PP,128 

61 Goross 

62 * POSICAO ALIADO 

63 FORY=STOMOIX=PEEK (14400) 

64 IFX=0,74ELSEIFX=24,101 

6S 1FX=32,PC=PAIPASPA-L0SFORT=1T010!NEXTT:GOTOGE 

66 1FX=64,PC=PAIPA=PA+1O3FORT=1 TOLO :NEXTTEGOTOGE 

67" IFX=128, GOSUB72:RETURN 

68 IFPACOORPAD4O, PA=PC 

69 PRINTAVOO4PC,ALS;D96I4PC, ADS; 

70 PRINTAPOO*PA,NISFAPGIAPA,NZS; 

74 NEXTYSRETURN 

72 * Tiro 

73 FORC=16261+PATOL5I6S*PASTEP-64 

74 POKEC,133 

75 SS=USR(RND(20)+1292) 

76 POKEC, 128:POKEL626L+PA, 180 

77 NEXTC 

78 IFPIN1O+L=C-15300,PRINTOPINSO41 GTS FAC=AC+10201=04+S1PRINTOL 

82, AC): GOSUB27: IFAC/W=200 , 37ELSEGOTOSO 

79 02=02+1:1FAC)O,AC=AC-10:PRINTOSB2,ACS 

80 RETURN 

81 * Entrada no high-score 

82 IFHMSC1) “ANDAC)O, HO (1)="“2HNS CA )= 

83 CLS1GG=03ETS="":FORC=1TOS 

B4 IFAC)VALCHNSCC)),B6 

BS NEXTC:GOTOLOO 

86 PRINTCHRS(23):PRINTTABC6)“P A R A BENS |”, TABC6)STRINOSCA 

5,CHR$(131)):PRINTO20B, “Seu escore e'”,.“um dos 5 maiores do dia 
Ea 

87 PRINT“Favor colocar seu nome ou apenas suas iniciais e apert 

ar ( ENTER 2.75 

B8 POKELG012,2442POKEL6O14,245:POKE16016,246:PRINTA662, "= — — — 
89 MS=INKEYS:LFM5="“ANDGGC24, PRINTOS9B46G, CHR$ (176) 4 EFORT=1TOSEN 

EXTTEPRINTOS9B+66,” “;3GOTOBPELSEIFHS=CHR$(13),92ELSELFMS=CHRS(B 
YANDGG 30, PRINTOS9B+0G,” “FIETS=LEFTSCETS, (G0/4-1)) :60=66-4:G0TOB 

9 

70 IFOG=24, B9ELSEPRINTOS98+06, MS; :60=60+4ETS=ETS+MS:GOTOBP 

94 * Troca 

92 HNS(6)=STRS(AC) EHOS (6) =ETSEHHS (6) =HHS 

93 Mi=0:FORB=CTOS 

94 IFUALCHNSCB))CVALCHNSCB+1)),GOSUB97 

95 IFM120,93 

96 NEXTB:GOTOLOO 

97 MIS=HNSCB)EH2S=HOS(B) MIS=HHS CB) 

98 HNSCB)=HNSCB+1):HOSCB)=HGSCB+1) 2HHS CB) =HHSCB+1) 

99 HNSCB+1)=H1S:HOSC(B+1)=M2S:HHSCB+1 )=H3S1HL=4 ERETURN 

100 * Quadro do high-score 

104 CLS:FORA=15365TOL613ISTEPL2BEFORB=ATOA+S22POKEB, 13L:NEXTB, A 
102 FORA=15364TOL60GBSTEP64:POKEA, 1701POKEA+23, 191 1POKEA+I6, 1911 

POKEA+SA, 149: NEXTAIPOKE 16132, 130:POKE161B6, 129 

103 PRINTA71,"0S MELHORES DO DIA“;995,"PONTOS”;9106,"MEDIA DE AC 

ERTO”; 

104 FORB=1TOStA=Bus26 

105 PRINT9Z7+A,HOSCB) B9S+A,HNSCB) DLODHA,HHSCB) 5 

106 NEXTB:G0TO34 

107 * Instrucoe: 

108 PRINT9199,"0 seu objetivo e impedir que O navio inimigo, ocu 

pe Os quadrantes com ( ) ate chegar a voce. Se ocupado, voce 
tem que acertar o navio antes que o mesmo mude de setor, “;EPOKE 
15572,238 

109 PRINT“pois do con-trario nao havera como recuperar o quadran 
te."1PRINTTAB(11)“Voce tem 3 vidas e 4 níveis para Jogar. Cada t 
tro “4 

110 PRINT“va-le 10 pontos a serem somados ou diminiuidos do seu 

escore depen-dendo apenas de sua pontaria e a cada 200 pontos vo 

ce muda de ni-vel. Apos todos serem ultrapassados, voce permanec 

era no nível 4 ate i » 
4141 PRINT"e a cada vez que ultra nivel, recebera u 

vida de bonus, ou 50 pontos caso ja possua 3.º:PRINTTAB(LL)“Use 
CICHRSC9IG” ) e C “PCHRSC94)5” ) para mover seu canhao, a bar 

ra de espaco para atirar e ( “5CHRSC9L)5” D( “SCHRS(92)) 

142 PRINT” ) para abortar o Jogo.“tPRINTTAB(21)"B 0 À SORTE 
ºaPRINTTAB(18)“Para continuar < ENTER )”s 

119 AS=INKEYSEIFASC)CHR$(13), 1 13ELSERETURN 


























































































Ayrton Ribeiro tem 23 anos, cursou 6 períodos de Engenharia Elé- 
trica na AEVA e atualmente tenta o vestibular para Informática. É pro- 
gramador em BASIC, FORTRAN e PASCAL. Já foi usuário de um CP- 
200, um CP-300 e um DGT-100, estando agora com um Apple Senior. 





MICRO SISTEMAS, julho/85 


JOGOS DE AÇÃO EM LINGUAGEM DE MÁQUINA 
101 Cuber (32K) ajude o cuber a enfrentar os inimigos enquanto a pirâmide muda 
de cor. 


102 Trapfall: (16K) enfrente as armadilhas (Pitfalis) na caça ao tesouro. 

103 Jr. Reverenge: (32K) ajude Jr. a salvar seu pai do terrível Luigi. 

104 8-Ball (16K) para os amantes do jogo de bilhar. 

105 Tênis: (32K) para os amantes do jogo de tênis. 

106 Cyrus (Xadrez): (32K) para os amantes do jogo de xadrez. 

107 Sea Dragon: (32K) emoção e suspense sob as águas. 

108 Tubarão: (16K) um jogo para quem tem nervos de aço. 

109 Vegas: (32K) sinta-se num cassino-caça-niquel, cartas, loto, dados e 21. 

110 Pic nic: (32K) ajude a formiga a estocar alimentos. 

111 Moon Shutie: (32K) destrua o principe das trevas. 

112 Zaxxon: (32K) enfrente os perigos de uma plataforma espacial para destruir o 
robô Zaxxon. 


113 Pooyan: (32K) defenda o seu vale da invasão dos lobos. 

114 Frog: (32K) ajude o sapo a atravessar a rua e o rio. 

115 Jet-l: (16K) viva as emoções do filme Retorno de Jedi. 

116 Andróide: (32K) elimine os andróides e saia do labirinto. 

117 Astro-Blast (32K) batalha espacial. 

118 Pássaros: (16K) elimine os pássaros invasores. 

119 Buzzard Bait (32K) ataque os pássaros com sua lança. 

120 Candy Co: (32K) coma doces e vitaminas para eliminar os inimigos. 

121 Cashman: (32K) pegue o dinheiro e elimine os gatos (99 telas). 

122 Clowns: (32K) fure os balões saltando na cama elástica. 

123 Cosmic: (16K) futebol americano com naves espaciais. 

124 Cpede: (16K) mate a centopéia e a aranha. 

125 Demon Seed: (32K) destrua pássaros, sementes e a nave. 

126 The King: (32K) salve a princesa raptada pelo King Kong. 

127 Firecopt (32K) apague incêndios e elimine incendiários. 

128 Doodie Bug: (32K) estilo Pacman. 

129 Fury: (32K) batalha aérea. 

130 Gallax Attack: (16K) batalha espacial. 

131 Gllaxxons: (16K) batalha espacial. 

132 Gobbler. (16K) tipo Pacman. 

133 Grabbler. (32K) defenda-se dos inimigos em um duplo labirinto. 

134 Grand Prix: (32K) corrida de carro. 

135 Kron: (32K) 4 jogos diferentes em um. 

136 Lunar (32K) vença os obstáculos durante um passeio de Jeep na lua. 

137 Muópies: (32K) atire tortas e defenda-se dos cozinheiros. 

138 Pedro: (32K) defenda o jardim dos animais. 

139 Pinball (32K). 

140 Polaris: (32K) defenda os submarinos do ataque aéreo. 

141 Draconia: (32K) salve os prisioneiros do espaço e fuja do dragão. 

142 Bag-Man (32K) roube o ouro e fuja dos mineiros. 

143 Tut's Tomb: (32K) enfrente os perigos de uma caverna em busca do tesouro. * 

144 Willys: (32K) transporte os números de um tado para outro sem ser derrubado. 

145 World's of Flight: (32K) simutador de vôo. 

146 Mega Bug: (16K) fuja das baratas em um labirinto. 

147 Bandits: (32K) caça ao tesouro em três mundos diferentes e 300 variações 
de jogo. 


148 Poltergeist pegue os objetos para Carol Anne. 
149 Double Back contome as figuras sem esbarrar. 
150 Storm Arrows 

151 Time Fighter: vença os inimigos no túnel do tempo. 
152 Super Pac Il: estilo Pac Man. 

153 Speed Race: corrida de carro. 

154 Fly Tiger 

155 lce Hockey: partida de Hockey. 

156 Out House: defenda seu dinheiro dos ladrões. 
157 Packmaze: estilo Pac Man. 

158 Pac-Tac: estilo Pac Man. 

159 Robatron: destrua os robôs inimigos. 

160 Tempest 

161 Protetor: aventura espacial. 

162 Venturer 

163 Defense: defenda suas bases. 

164 Quicx. preencha 75% de tela sem ser atingido. 
165 Smurf: passeio na floresta. 

166 Decathlon: 10 provas olímpicas. 

167 Color Car. corrida de carro. 


JOGOS DE AVENTURA COM ALTA RESOLUÇÃO GRÁFICA 
201 Calixto: (32K) ajude o arqueólogo (prof. Lagarto) a recuperar o tesouro - 


em inglês. 
202 Sea-Quest: (32K) recupere o tesouro perdido - em inglés. 
203 Shennan: (32K) encontre o tesouro no fim do arco-Íris - em inglês. 


TABELA 
XX DEDESCONTO 


204 Sanctum: (32K) exorcize o demônio - em inglês. 
205 Star Trader - mercador das galáxias. 
206 Midie Kindgton - recupere os tesouros na catacumba. 


JOGOS EDUCATIVOS 


301 Jogos Educativos: (16K) série de nove jogos educativos para crianças de 3 a6 anos 
abrangendo figuras, letras, nomes, números, soma, subtração & desenhos colo- 


nidos. 
302 Matemática: (16K) ensina as quatro operações básicas em vários níveis de 
dificuldades. 


303 Memória: (16K) é o jogo clássico da memória, duas figuras iguais. 

304 Figuras Mágicas: (16K) associação de figuras e cores de seis maneiras diferentes. 
Para crianças de 3 a 6 anos - manual em inglês. 

305 Letras Mágicas: (16K) ajude o bicho-papão a comer as letras certas. Para crianças 
de 3 a 6 anos - manual em inglés. 

306 Números Mágicos: (16K) ajude o Grover a brincar com os números. Para crianças 
de 3 a 6 anos - manual em inglés. 

307 Correio Eletrônico: (16K) ajude o Big Bird a entregar as correspondências nos luga- 
res certos. Para crianças de 3 a 6 anos - manual em inglés. 

308 Caça às Estrelas: (16K) jogo estratégico. Você tem que pegar as estrelas no céu. 
Para crianças com mais de 7 anos - manual em inglês. 


APLICATIVOS COMERCIAIS 


401 WRITTER Il: (32K) editor de texto com as seguintes características: linha de até 
240 caracteres na impressora e 51 colunas na tela. Capacidade para imprimir 
caracteres portugueses ou símbolos especiais (até 10). Paginação automática. 
Centralização automática. Manual em inglês com 90 páginas. 

402 Elite-Calc: (16K) planilha eletrônica com as seguintes características: até 255 li- 
nhas ecolunas. Manipula textos, números, operadores matemáticos, funções trigo- 
nométricas e funções estatísticas (máximo, mínimo, média). Emite gráficos e 
permite ordenar colunas e linhas. Manual em inglês e português - 20 p. 

403 Color File: (16K) banco de dados que permite manipular 7 arquivos pré-definidos 
(endereços, despesas, investimentos...) Você também pode definir os seus próprios 
arquivos com campos alfabéticos ou numéricos. Manual em inglês com 10 
páginas. 


LINGUAGENS 


501 Edtasm: (16K) Linguagem Assembler para o 6809 - MI. 
502 Forth: (16K) Linguagem Forth para o 6809 - MI. 

503 Logo: (32K) Linguagem educativa logo - MI. 

504 Pascal - Linguagem Pascal. 


UTILITÁRIOS 


6801 Color Kit (32K) utilitário em Assembler que complementa o Color Basic com mais 
de 30 funções para facilitar a programação em Basic ou linguagem de máquina. 
Manual em inglés com 30 páginas. 

602 La cb a od 

brancos, comentários e concatenando linhas. 

603 Tiny Compiler. (16K) utilitário que permite compilar a maioria dos comandos Basic 
e extended Basic. Manual em inglés. 

604 Super Screen: (16K) aumenta o tamanho da tela O Color passa a trabalhar com 57 
colunas e 24 linhas. 

605 Disassembler. (16K) disassemblador de programas em linguagem de máquina. 

606 Hambug: (16K) permite analisar byte a byte qualquer programa Basic ou em lin- 
quagem de máquina. Manual em inglês. 

607 Banner. programação de letreiro. 

609 Cores 9: Editor Assembler. 

611 Magic Box: converte programa de Basic TRS 80 p/TRS 80 Color. 


SOFTWARE DE COMUNICAÇÃO 


711 Color Terminat (16K) software de comunicação para o projeto Cirandão, Aruanda e 
Bancos de Dados Particulares. Transmite e recebe arquivos em Basic ou linguagem 
de máquina. BAUD RATE de 110 a 9600 em DUPLEX/HALF/FUL/ECHO. Ta- 
manho da palavra: 7 ou 8 bits. Paridade par, impar ou nenhuma. Stop Bits de 1 a 9. 
Manual em inglês com 30 páginas. 


NOVIDADES 


901 Composer. gerador de música. 
902 Voice: gerador de som. 

903 New Talk - gerador de som. 
904 Música 2 - gerador de música. 


Desejo receber os seguintes programas pelo(s) qual(is) pagarei a quantia de Cr$ 
PROGRAMAS: 








até 65.000 - sem desconto NOME: 
de66000até 115000 5% |] o: 
de 116.000 até 165.000 10% CIDADE: 
de 166.000 até 215.000 15% 5 
acima de 216.000 20% 





Up qa DEP! 


Centro, CEP 20.030 - Riode Janeiro-RJ. Despesas de Correio incluídas. 


130.000 


140.000 


Para tal, estou enviando um cheque nominal à ATI Editora Ltda, Av. Presidente Wilson, 165-Grupo 1210 





ue a ee 


sinclair sinclair sinclair sinc 








Submarinos em Ação 





Frederico dos Santos Liporace 


Jogos, especialmen- 
te os da linha Sinclair, 
são de dois tipos: inte- 
ligentes (xadrez, ga- 
mão) ou de ação (spa- 
ce invaders, pac-man e 
outros) e, para infeli- 
cidade do usuário, ra- 
ramente encontramos 
um programa que reú- 
na essas duas caracte- 
rísticas. 

Foi pensando nisso 
que bolei o “Missão 
Atômica Submarina” 
ou “M.A.S.”. Com ele, 


creio que consegui 
reunir estratégia e 
ação. 


DIGITAÇÃO 


Devem ser reservadas quatro linhas 
REM para códigos hex. pois o programa 
utiliza o Assembler quando é necessário 
rapidez. Eis o tamanho de cada um 
deles: 

e linha 1: Bloco 1 - tamanho 224 

bytes. 

e linha 2: bloco 2 - 576 bytes. 

e linha 3: bloco 3 - 320 bytes. 

e linha 4: bloco 4 - 508 bytes. 

Bloco 1 — Contém várias sub-rotinas 
em Assembler que serão usadas pelo 
programa. Atenção: apesar de só serem 
reservados 224 bytes, você dará entrada 
com 255 códigos hex, Isso não afetará o 
andamento normal do programa, pelo 
contrário. 

Bloco 2 - Guarda dados para formar a 
tela quando se está em mar minado. 

Bloco 3 - Executa o jogo quando se 
está em mar minado. 

Bloco 4 - Executa o jogo quando se 
está no quadrante de um navio inimigo. 

Como em todo programa Assembler, 
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PREPARENCO 
COMBATE 





todo cuidado é pouco na hora de se re- 
servar Os espaços e entrar com códigos 
hex. 

A listagem BASIC é usada quando 
não é necessária rapidez. Sobre ela ape- 
nas um comentário: foi usada, sempre 
que possível, a função VAL, que econo- 
miza alguns bytes mas reduz a velocida- 
de. Se você é adepto da filosofia “'quan- 
to mais rápido melhor”, creio que ela 
possa ser retirada sem maiores conse- 
quências. 


O JOGO 


Depois da apresentação o jogo come- 
çará. Inicialmente você terá que destruir 
seis navios, que estão aleatoriamente es- 
palhados pelo oceano com apenas quin- 
ze torpedos disponíveis. 

O oceano é formado por 48 quadran- 
tes (de 1,1 a 8,8) e você só poderá se 
locomover para um quadrante adja- 
cente. 

Você tem à sua disposição um radar 
que funciona da seguinte maneira: es- 


tando o seu navio no quadrante (4,5), 
o radar irá pesquisar os quadrantes 
(3,5); (5,5); (4,4) e (4,6) avisando se hou- 
ver navio inimigo num desses sem dizer 
qual. O radar também não funciona nos 
quadrantes de borda. 

Em cada quadrante se encontra uma 
das seguintes situações: 
condição branca — nenhum inimigo no 
setor. O computador pede novas ordens. 
condição amarela — mar minado. O ini- 
migo espalhou minas explosivas e você 
terá que se desviar usando as teclas “6” 
e “7”, Se houver colisão, o jogo acaba, 
senão 300 pontos são acumulados e o 
jogo continua. 
condição vermelha — navio inimigo no 
quadrante. Você se defrontará e terá 
que destruir o inimigo usando as teclas 
“5” e “8” para locomoção e a tecla 
“0” para disparar um torpedo. O navio 
inimigo surgirá no lado esquerdo da tela 
e se deslocará para o outro lado. Você 
terá que atingilo antes que ele chegue 
ao lado direito, caso contrário o jogo 
termina. Se o navio for atingido, 1000 
pontos são acumulados e o jogo con- 
tinua. 

O jogo termina quando você conseguir 
destruir todos os navios inimigos ou ser 
destruído. No primeiro caso, o jogo é 
reiniciado e os pontos acumulados. 
Boa sorte!! 

Obs.: os blocos 2, 3 e 4 não estão preen- 
chidos em sua totalidade, mas é necessá- 
rio que se reservem os bytes designados 
em “tamanho”, pois serão usadas instru- 
ções do tipo “CALL” e “JUMP. JP”. 





Frederico dos Santos Liporace estuda no 
Colégio São José, no Rio de Janeiro. Possui 
um TK-85 e desenvolve programas em 
BASIC e Assembler. 





MICRO SISTEMAS, julho/85 
















"MINADO", A 







NEXT 1 
PRINT AT 
PRINT AT 


sa200 
VAL 1 
ORE +! 








PRINT AT & 























GOSUB UAL “400! 
TAL 
FEEPRINARSEPES 
ádo 
E 
THEN GOTO VAL 
E “s00" 
SCORE 3soe 
AT ="" THEN GO JRL 
JL 
fal THEN GOTO VAL 
o ="7" THEN VAL 
70 F 1 = THEN GOTO VAL 
70. F INK ="S" THEN GOTO VAL 


4 


ss dd 
»o99695 9 


SUAS ORDEN 


THEN GOTO 70985 





30AD 


«>0 THEN RETUR 

















AGORA EM PORTUGUES 1 
OS UTILITARIOS MAIS FAMOSOS 
DA LINHA APPLE. -. 









C) DOS BOSS - EDITOR DE COMANDOS DE DISCO. C) PASSO à P 
CJ) ALPMA PLOT = UTILITARIO CRAFICO/TEXTO. C) PASSO à PASSO 11 - CURSO SUPLEX 


C) PRONTO DOS - TRIPLICA A VELOCIDADE DE O DE AR= CI PASSO à PASSO III - CURSO AUTO-DIDATICO DE DOS 130.000 « 

















QUIVOS NORMAIS OU BINARIO C) SUPERCRAFICO - EDITOR/MONTADOR DE GRAFICOS. 000 u 
C) TIP DISKS1 = 100 DICAS DE PROGRANACAO EX UK DISCO. CI AGENDA - PROCRANA PARA KARCAR CONPROKISSO 110.000 « 
C) FLEX TEXT - GERA 7O COLUNAS DE TEKTO SEX AUXILIO = C) EDITOR DE TEXTO - CARTAS, RELATORIO, TABELAS, ETC 99.000 u 

DE + C) MALA DIRETA - CADASTRO E EKISSAD DE ETIQUETAS 119.000 = 
CJ) TYPEFACES - 26 FONTES DE LETRAS E NUMEROS EK ALTA- C) BANCO OS DADOS - FORMULA ARQUIVOS DIVERSOS 190.000 4 

RESOLUCAO GRAFICA. C) MUSICA - COXPOSICAO/IKPRESSAD/PAUTAS/EXECUCAO 150.000. 
CI APPLE MECKANIC « UTILITARIO DE SHAPE TABLE/BYTE ZAP CJ) CONTA CORR.BANCOS - CONTROLA/EKITE EXTRATOS 119.000 « 
C) BRACLE BASIC - (64K) UM DOS MAIS PROFISSIONAL PARA C) CONNECT - COMUNICACAO KICRO/RICRO EX 599.000 u 





SEU APPLE COMPATIVEL. e” PROCRAX PLICATIVOS COKI 


CONSULT 




























€3 GPLE - EDITOR OE LINHAS RAPIDO P/PROCRAKAS EM BASIC E) FOLKA PGTO/CONTAB.GERAL/CONTA: - 
* EDITOR DE TEXTO, MALA DIRETA CO DE DADOS E AGENDA, FUNCIONAK 6 OU INTEGRADOS ENTRE SI *u 

ASSINALE O PROGRAMA E ENVIE ESTE CUPOM E 
com CHEQUE NOMINAL PARA « tm GRATIS *» <TABELA DE PERKS/POKES> " 
ROBOB POTENCIAL COM.LTDA POTENCIAL SOFTWARE E 
cx 977 - CEP 13100 R-JOSE VILAGELIM JR,S2 —- CAMBUI : 
CAMPINAS - SP FONE (0192) 53-6932 E 





es 





SUBMARINOS EM AÇÃO 





7110 LET R=R+1 

7115 LET Píl)=P(1)+1 

7120 POKE R,8 

7125 RETURN 

7155 GOSUB VAL “8000” 

Pri IF PEEK (R-33) <»0 THEN RETU 
7205 





dd PEEK 


RN 
IF PEEK (R-1) <>0 


Listagem BASIC 





Bloco 1 
— endereços de 16514 a 16738 
— tamanho: 224 Bytes. 






























4 2R OC 40 23 3E 18 06 
e 36 50 25 10 FB 23 30 
o Do Ca 55 40 CO ZA OC 
8 23 36 07 23 DE 1E 36 
S 2s 10 FE 56 84 25 25 
4 16 11 1F 00 36 OS 19 
2 85 23 23 SD CE RE 40 
e se o 1E 36 853 25 
5 FE ca SE 12 28 
“2 oo 19 11 65 
os 1A 77 15 23 
F& SD FE 00 
D2 sr 65 10 
7 Co 36 80 
36 50 
es 11 23 
ED so 25 
so es 
36 02 23 os es 36 
6s 11 23 00 ED 52 
7á 54 ZE 35 os os 
se FE 80 cê 2s 10 
so 11 24 00 ED S2 
ss FE So Cê zB 7! 
os 80 ca és oo cs 
14 o. cs DE 1c 00 
2a 10 1C 1C 41 06 
30 es FE 30 cs c 
38 42 
Bloco 2 
— endereços de 16744 a 17319 
— tamanho: 576 Bytes. 
15744 os dE US OS 05 OS OS 
16752 os 25 oE 05 OS 05 
16760 os vs os DE 05 OS 
6763 os Bs 08 058 os 05 
677 so Bo 60 50 50 50 
16784 Bo so So so so so 50 
16792 8o 50 30 50 80 50 50 
16500 80 50 SU 50 80 50 50 
16305 Bo E? 50 S0 80 EU SO 
165185 Bo 50 30 80 50 80 50 
16524 so 820 50 80 SO 50 80 
16852 80 80 37 60 80 EU SO 
16840 Bo So 50 580 50 &0 30 
16548 o 80 80 50 97 97 97 
16856 30 50 30 580 97 50 80 
16564 Bo so 30 60 50 80 30 
16872 80 50 50 50 SO 50 50 
165850 87 80 80 50 80 50 30 
16588 Bo 30 50 50 50 S0 SO 
168685 80 SU &0 0 50 50 50 
16904 Bo 7 30 50 50 &0 50 
16912 80 30 EU &0 50 SD 80 
16920 Bo 30 80 50 80 50 50 
16 50 50 50 80 80 50 50 
6 Bo 50 30 50 80 50 50 
80 50 30 50 50 50 50 
seo so 80 80 80 50 
Bo 50 50 80 &0 80 
50 80 50 80 80 97 
Bo 50 97 80 80 50 
s7 80 80 80 50 80 
Bo 30 60 80 50 30 
50 50 &0 50 EU 30 
30 80 0 80 0 50 


Listagem Assembler 
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1R+33) <>0 THEN RETU 


THEN RETUR 


z 
Ê 
4 
0 
3 
3 
1 
ô 
4 
1 


GEOGMAMIGMO 





sam 


CMS PME APM Ch Cd DD LT 





e 
o 
Fá 
Ê 
aj 
Ê 
s 








0 0 O 


99900099096909650599900 


8020 LET Ag= 
seas E AT. Ser 


sso” 
gs2s” zE “Esiz, (Xe) =" 
a IF tipo 


Esse IF BsLUz- 1) ,X) ="8" 
VAL “85: 


[=] 





PREPRPRRRRHER 





PRPPRPRRRRRRRRR Er 








LET Z=P(1 

LET U=VAL “1º 

LET X=P(Z) 

THEN GOTO VAL 
IHEN GOTO VAL * 
THEN GOTO VAL 





Z= 


X=1 «ESEs- x 


"Bses" 
THEN GOT 
THEN GOT 
X)="*" THEN GOT 


THEN GOT 





Tio,2; 












so so so 80 so 
so so so 80 50 
so so so 50 80 
so so so o so 
Bo se e7 80 SU 
so su o3 do so 
so so so 50 so 
so 37 80 80 57 
so so so so 50 
so 50 o so 50 
so so 80 so se 
so so so 
s7 Su so 8 
so so so 50 so 
Bo so 8o 80 50 
Bo so so so so 
Bo 50 so 80 so 
so so so so se 
so se 80 97 5 
so co Be 80 
so so so 50 
so so se o 
so se so 
so se so 
so s7 80 
so so so 

a so so so 

se so 87 97 

40 so so 

43 so so 

sê so so 

Si so so 

.2 so so 
E) se 
s RA 
[=] Es 
8 so 
[=] Rô 


— endereços de 17326 a 17645 
— tamanho: 320 Bytes. 


nm 
n 





ã 
B 
á 








41 € 


mesonomo nome 
- 


2 
õ 
E 
ê 
á 
c 
o 
4 
5 
4 
F 
E 
E 
E 


MOPrOMOGOE DOR MM 


JMEPOSEDOGOS POSUOE 
nem 


seMeEMSO 
MORRaSO 


e8 


eae nDaAMENTEGONO Prom 
OSS PUGSPARUDDNG-IO 


s 
8 
o 
E 
5 
5 
E 
& 
a 
a 
FE 
aa 
4D 
41 
D 
a 
É? 
D 
8 
E) 
E] 
1 
D 
o 
E 
1 
E] 
so 


t+ e 
OMPREOPPRPROPOMOPIPOPRMO TONS PO 


e 
+ 
MUSEO ENMODR ERON PDM ROSE 


ODE NNDEOENIO EUROS EMEMBNTO 
OGAMPRNPOPRNPODDEO POMOPOM-PGIDOS 


WREOPOMOSOOMGSOA 
Se 





osonemeSC MPS 
DOM D DMD 


ao 
+ 
p 











8580 PRINT AT 19,2; 


8581 RETURN 
8585 FCRINT ATlS,2;" 


8590 RETURN 
8700 RETURN 
8800 LET Z 
8801 LET x=Pt2 
Eai IF M$(Z,X) 


2 
8804 IF MS(Z,X1="+" THEN coTo so 
8505 PRINT AT 

= 


B 18; ;TAB 18," 
8 10 PRINT AT 17,17; 


8815 LET C$="VERMELHA" 
8616 RETURN 
8820 PRI 
TAB 18 


555 PRINT ET 17,17, TERENENNRES 
8825 RETURN 








THEN GOTO 68 








8970 GOTO VAL "300" 





E ZE FE 80 C2 BA 

O CO 3E 01 C9 SE 

2 CD 44 23 7E FE 

D 44 3E 00 CO SE 

E co 1C 1C 4€ 
Bloco 4 


endereços de 17652 a 18160 
— tamanho: 508 Bytes. 




































7E 14 DS 68 14 O4 02 03 
à oo os es CD 82 40 2A OC 
1 42 11 BE O2 19 SE OS 06 
1 eo 3 6 23 10 FE 253 50 
17 FE O 2 OB 45 28 OC 40 
1 11 A e 19 22 Fá 44 CD 
1 CF 46 2A OC 40 11 DF OU 
1 19 ZE FE 44 CL A7 46 2H 
1 oc 40 11 09 01 19 SA FE 
1 44 47 7E FE 76 CA SB 45 
1 36 S0 23 10 FS 3A FE 44 
1 47 TE FE 76 CA SB 
1? os 10 FS €3 SA 
17 F9 36 Os CD BB 
17 ab FE FE 3E 00 
17 46 CD BD O7 7E FE 
17 63 45 FE 21 CA SE 
17 ic CA Bi 45 CS 27 
17 Fá 44 25 ES C1 11 
17 19 ?7E FE 76 CA 2? o 
17 Fá 44 CD CE 3 
17 e Fa 44 25 E 
17 76 46 22 Fé b 
1? cr 27 46 21 E 
17 2 SD FE 00 7 
1? ae FA 44 70 4 
17 aa 21 00 C6 D 
17 se es ca 35 E 
17 2 4s 36 SE D 
17 47 46 FE CA 
1? 1D so 3a as 
17: so A er 46 FA 
17: 44 T3 Ss 2n F6 os 
17: os cs 1 46 2A as 
17 11 21 9 22 F6 co 
1? A7 46 46 CD ss 
17 ci 10 ei FC aé oo 
17 co E1 91 46 21 4 
17 36 di CD 47 46 a 
17 CA 1E 46 CD 39 46 so 
1? 45 C5 27 46 CS SA 4. 
1? 06 FE 10 FE 30 FE cs 
17 4€ CD 75 46 ES 
17? Ea FE 00 32 FS co 
15004 2a F6 44 26 265 7E 76 
158012 CA 72 46 CD 91 46 FE 
15020 44 26 22 F6 44 CD 7? 46 
158028 3E OS 32 F9 dá CO SE 6d 
15056 Co 2A OC 40 11 09 01 13 
15044 TE FS Sa SD 13 06 1F 16 
18052 FE SE CA 46 77 23 15 
150 10 FS Fi co 2A F6 dá 
150 DE 07 35 es 10 FB 11 
15076 1A 08 19 7 36 80 23 
15054 10 FE C9 F6 44 36 80 
16092 es 36 07 36 09 25 36 
15100 oo 23 36 es 36 84 23 
15108 36 &0 11 oo 19 36 Oé 
16116 os 05 23 36 16 10 FE 253 
18124 S6 57 CS 2h Fá dá 25 VE 
18152 FE 765 CS 356 80 11 Qd OU 
15140 19 7E FE 76 C8 36 80 28 
15145 4 44 36 89 253 36 08 23 
15156 36 89 €9 1C 
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1 & acessórios 





























E preciso muito investimento em o mesmo padrão tecnológico é exigido, 
pesquisas para alcançar a tecnologia mantendo assim, um desempenho 

da Verbatim muito acima da concorrência. São as 
O mundo todo sabe e usa seus únicas com garantia total de 5 anos, 
produtos, porque confia na qualidade contra qualquer defeito de fabricação 


e no desempenho 100% livre de erros Junte-se todas essas vantagens e, 


dos disquetes, testados um a um e tenha em mãos, os produtos mais o 
únicos a excederem as normas padrão perfeitos, produzidos no Brasil pelo er a Im 
Com as fitas magnéticas Verbatim, maior fabricante mundial de disquetes ' 








O ""PACOTÃO" OFERECE: 


* Micros 
* Software 
* Assistência 
técnica 
IBM/PC, 
XTe AT 


* Suprimentos 


* Acessórios 
periféricos 


CBYATAIOAD 


Rua Luiz Goés, 1894 — São Paulo 
CEP 04043 — Telex: (011) 37755 DTRD 


e Formulários Interprint 
e Etiquetas Jac Tab 
e Fitas Impressoras 
e Disquetes de BK" e 8” 


282.1602 
64.0519 


ENTREPOSTO TOTAL DE SUPRIMENTOS PARA INFORMÁTICA 


05413 - RUA LISBOA, 502 - TELS.: (011) 








SUPRIMENTOS 
PARA PROCESSAMENTO DE DADOS 








Rua Monte Alegre, nº 1312. CEP 05014 - Telex (011) 39863 
Fone: 263-3400 (Tronco Chave) - SOS-CPD: Central 815-3344 -BIP 5193 - São Paulo-SP 














O usuário de micros, 
principalmente aquele que tem o 
seu em casa, além de conviver com 
o equipamento na escola ou no 
escritório, vira e mexe se vê diante 
de problemas com a assistência 
técnica, dificuldade em encontrar 
cabos e conectores e demora na 
entrega de peças de reposição, etc... 

Não é dificil também encontrarmos 
usuários que se ressentem de 
melhores informações sobre onde 
encontrar o que precisam, seja a 
oficina autorizada para o seu micro, 
seja a loja onde comprar a fita 
indicada para o seu caso. 

Cientes disso, a equipe, de MS 
resolveu que já estava na hora de 
prestar mais um serviço, atingindo 
ao mesmo tempo os dois lados da 
questão. 



































E aquela que lhe devolverá 










| AINDA, E o prazer de ficar em frente do seu 
QUE ESTÃO monitor por tempo ilimitado 
FALTANDO 
NO SEU MICRO? MICROTELA possibilita que você 










continue com seu TV, filtrando e 
[a eliminando os reflexos, ao mesmo 
tempo que aumenta a resolução da 
imagem 







DELTA SOFT 
MICROINFORMÁTICA LTDA. 

Al. Lorena, 516 — CEP 01424 

Tel. 283.3544 /284.5516 

Cx. Postal 18708 — São Paulo — SP 


Fornecemos também 
suporte exclusivo para 
monitores. Consulte-nos 























Se o assunto é Informática... 
em Fortaleza procure a Telemicro 









Você escolhe seu fornecedor 
pelo preço? 









| « comercialização de micros * componentes eletrônicos 












eia * desenvolvimento Pelo atendimento ou pelo prazo 
é Euprimentos « estabilizadores de entrega? 
º FS e placas * modens 


Reúna todos os ítens e 
escolha o melhor 


datamídia 


suprimentos 


DA Rua Cesídio de Albuquerque, 657 
a e» TELEMICRO Cidade dos Funcionários 
é— Tel.: (085) 239.3819 — CEP 60.000 
INFORMATICA COMERCIO E ENCENHARIA LTDA Fortaleza — CE. 

























e disquetes e fitas impressoras 
e pastas cetiquetas 
e arquivos para disquetes 
e disquetes e fitas magnéticas 
e formulários 


Estamos lançando, a partir desta 
edição, o nosso CADERNO DE 
SUPRIMENTOS E ACESSÓRIOS 
que, assim, está abrindo um espaço 
nunca antes dedicado aos 
fornecedores desses pequenos 
instrumentos indispensáveis ao 
bom funcionamento do seu micro 
— e que representa um segmento 
importante do mercado de 
imformática —, e a você leitor, que 
agora não precisa mais coçar a 
cabeça toda vez que seu 
equipamento “pifar”. 

Consulte o “CADERNO DE 
SUPRIMENTOS E ACESSORIOS 
MS e você vai saber onde encontrar 
a assistência técnica autorizada 
para o seu equipamento e onde 
comprar as fitas, disquetes, cabos, 
papel, etc. 


DISCOS MAGNÉTICOS MARCA 
CONTROL DATA (Go) 


* SÃO PAULO (011)572.1118 
* RIBEIRÃO PRETO (016) 625.1571 


* RIO DE JANEIRO (021) 262.9458 


datamiídia 1589 





Suprimentos Prodata 
uma boa impressão do que foi gravado 











QUME 4 SPRINT 
pasa 


CENTRONICS 150/2 FACIT 8000 

DISMAC (importada) POLIETILENO 

* Cr$ 65.000 CORRIGIÍVEL 
* Cr$ 35.000 


* Preços válidos até Agosto/85 


- 
P q (0) D Ay L A Rua Henrique Ongari, 103 
CEP 05038 — S. Paulo — Tels.: 864-8599 (linha tronco) 
Representantes: 
Rio de Janeiro: fone - 253.3481/Belo Horizonte: fones 225.9871 e 
225.4235/ Curitiba: fones 263.3224, 262.8632 
Porto Alegre: fones 26.6063 e 26.1319/ Recife: fone 227.2969. 


















pics Comércio e Representações Ltda. 










PRODUTOS E SERVIÇOS PARA PROCES. DE DADOS 
Discos * Fitas magnéticas * Disketes 
* Fitas Impressoras * Pastas * 
Etiquetas * Formulário * Manutenção 
e recuperação em discos magnéticos. 


Av. Fagundes Filho, 745 Fone: 579-7218 
Jabaquara São Paulo - SP 



































E 
= £ rodada MS 


Veja aqui uma interessante aplicação do 
programa “Código Morse à moda Sinclair” e 
descubra como usar seu micro para fazer... 


CW sem gastar 
muito O$J 


Erwin Hiúbsch Neto-PY2RNJ 














pós algumas horas de utilização, com grande suces- =] 

so, do programa “Código Morse à moda Sinclair”, 
publicado em MS n9 40, ocorreu-me a idéia de usá- 

lo para manipular diretamente o transmissor através 

de meu TK 85, transformando-o em um eficiente — e econômi- 
co — “keyboard”. O primeiro passo foi realizar medições nas 
pistas da saída de expansão do micro, o que me levou a desco- 
brir uma variação de sinal de i.0V (sem caráter emitido) para 
1.5V (durante a emissão de um caráter) na 82 pista da direita 
para a esquerda, olhando-se o micro pela parte traseira (figura 
1); a partir daí bastou polarizar um transistor de uso geral que, 
por sua vez, controla um relé, cujos contatos irão manipular o TE [uniram 
transmissor ou um oscilador de áudio. - 
O circuito de nossa pequena interface e sua lista de material : 
estão na figura 2. Como se pode observar, é de grande simpli- pia /J o) ho) fo/ 
cidade e a montagem poderá ser feita em forma de “aranha”, AS) E sá 
em um pedaço de placa-padrão filetada, como no meu protó- 
tipo, ou, para os mais sofisticados, em uma plaquinha de cir- 
cuito impresso especialmente confeccionada. Aos que o soli- 
citarem, terei prazer em fornecer o esquema de adaptação da 



































SAÍDA PARA EXCITAR À BASE DO TRANSISTOR 











placa-padrão por mim utilizado. Figura 1 
Para sua maior comodidade, a ATI Editora Ltda. coloca à sua disposição Sistemas 
os seguintes endereços de seus representantes autorizados 
RIO DE JANEIRO PORTO ALEGRE SALVADOR BELO HORIZONTE 
ATI Editora Ltda. Aurora Assessoria Empresarial Ltda. Marcio Augusto das Neves Viana Maria Fernanda G. Andrade 


Av. Presidente Wilson, 165 — Gr. 1210 Rua Uruguai, 35 — sala 622 Rua Saldanha da Gama, 06/1º andar Caixa Postal 1687 
AU ] ; CEP 20030 — Tel: 262-6306 CEP 90000 — Tel: (0512) 26-0839 CEP 40000 — Tel: (071) 242-6393 Tel: (031) 335-6645 





Figura 2 













Jl(da fonte 
de alimentação) 


D1 


Pl(a entrada de 
Alim. 


Lista de materiais: 


TRI — Transistor de uso geral NPN 
(BC238, BC548 ou equivalente). 
D1 — Diodo retificador comum 
(1N4001 ou equivalente). 

RL1 — Micro-relé para 6 Vcc 
(Christian-Zettler AZ 802-2C.6D ou 
equivalente). 

R1 — Resistor 270 Ohms 1/4 Watt. 
J1 — Jaque mono comum para 
ligação do plugue da fonte. 

P1 — Plugue mono comum para 


do micro) 








Do 89 


ligação à entrada 9V DC do TK 85. 





filete 





Ligação de P1 
BE 


“Terra” 





2 — Plugue mono comum conforme 
entrada de manipulador do 
transceptor ou oscilador de CW. 
Diversos — Plaquinha de circuito 

impresso padrão, fios, 
solda, conector para ligação 
no 80 filete da expansão. 


= 
P2(a entrada de 
manipul. 


do transceptor ou 
oscilador) 

















A conexão da interface ao micro é feita em sua parte tra- 
seira no pente * para conexão da expansão, utilizando-se so- 
mente a 82 pista, a contar da direita para a esquerda, conforme 
mostrado na figura 3. Nesta mesma figura pode-se ver como é 
feita a ligação à fonte de alimentação, utilizando-se a própria 
fonte do TK: o plugue Pl deverá ser ligado na entrada de ali- 
mentação do computador, e o plugue proveniente da fonte 
deverá ser conectado ao jaque Jl, montado na própria placa 
do circuito. 


Após terminada a montagem, conecte o circuito ao 80 ter- 
minal do “pente” da expansão. Tal conexão pode ser feita 
usando um conector apropriado para ligação a placas de circui- 
to impresso, ou até mesmo uma pequena garra jacaré. 

Feito isto, carregue o programa no micro, e não se preocupe 
se o relê vibrar durante o carregamento. Após carregado, teste- 
o escolhendo a velocidade 60 e o modo 3 (automático). Na saí- 
da dos contatos do relé (plugue P2), você poderá ligar um osci- 
lador de áudio para prática de CW ou o seu próprio transcep- 





A interface de CW 


RENSI RS 1050/A 





A pós um respeitável QRX 
(SRI...), ocasionado pela 
virada do ano, finalmente a 
RODADA MS tem a satisfação de 
divulgar o resultado dos testes rea- 
lizados com a interface de trans- 
missão jrecepção de CW RS 1050/ 
A, da Rensi Eletrônica Digital 
Ltda (Caixa Postal 6661, CEP... 
01051, São Paulo-SP), gentilmen- 
te cedida pelos seus titulares, PY2 
EMI-Renato e PY2 AIM-Sinésio, 
para apreciação e posterior sorteio 
entre os nossos leitores, 

A boa impressão começa na 
ocasião do recebimento: muito 
bem embalado, o material é cons- 
titurdo da interface propriamente 
dita, de uma fita contendo o soft- 
ware necessário e de um manual 
de instruções que, embora de 
aurea aÇão bastante guns, é 
tão detalhado (ao contrário da 
maioria dos manuais de equipa- 
mentos de informática) que não 








bem explicados no manual. 


Durante a “prova de estrada”, 
ou seja, os testes nas faixas, o 
comportamento foi exemplar, 
sempre recebendo elogios dos co- 
legas e sem apresentar quaisquer 
problemas. Como acontece com 
qualquer equipamento de recep- 
ção automática, foi notada uma 


certa dificuldade na recepção de 
sinais fracos ou sujeitos a QRM, 
bem como na discriminação entre 
dois sinais muito próximos e de 
intensidades semelhantes, o que 
pode ser contornado sabendo-se 
explorar os recursos do receptor 
ou através de um bom filtro dt 
áudio, do tipo Realtom. O que é 
virtualmente impossível — e isto 
também acontece com qualquer 


equipamento, mesmo os mais so- 
fisticados — é a recepção dos si- 
nais dos “munhecas duras”, nor- 
malmente iniciantes no CW ou, de 
modo geral, da manipulação ma- 


deixa qualquer dúvida ao usuário 
médii 


io. 

A interface RS 1050/A, com- 
patível com praticamente todos 
os equipamentos da linha Sinclair 
= po veis no mercado nacional, 
é de facílima instalação, bastando 
encaixá-la no conector de expan- 
são do micro — no caso dos TK 
82/83, ZX81 e NEZ 8000, a in- 
terface será conectada entre o mi- 
cro e a expansão, de uso obrigató- 
rio, pois o programa exige um mt. 
nimo de 8 K. Suas principais ca- 
atira são: velocidades de 

a ppm na recepção (ajuste 
automático) e de 10 a 50 ppm na 
transmissão (ajuste por software), 
10 memórias de até 255 caracte- 





res cada uma e sinais especiais 
AR-SK-AS-KN e BT, não exigin- 
do qualquer alteração ou adapta- 
ção no seu micro. A interface dis- 
põe ainda de um LED para a cali- 
bração, um ajuste do tom de áu- 
dio .e dois jaques, um para rece- 
ber o sinal de áudio do receptor 
(RCVR) e outro para ser ligado 
à entrada de manipulador do trans- 
missor a T). Todas as precau- 
ções relativas a realimentação ou 
retorno de RF, que poderiam vir 
a prejudicar o funcionamento, são 
corretamente observadas no ma- 
nual, 

A utilização é tão simples 
quanto a instalação: após ser car- 


regado o programa entra imedia- 
tamente em execução, dividindo 
a tela em duas partes, separadas 
por um sinal de menor em vídeo 
inverso (que indica o modo de 
recepção). A parte superior é des- 
tinada aos sinais recebidos e a in- 
ferior aos sinais transmitidos, e 
ambas possuem 10 linhas, com 
SCROLL automático; durante a 
transmissão, cujo modo é indica- 
do por um sinal de maior em ví- 
deo inverso, os caracteres vão se 
transformando em vídeo inverso 
conforme forem sendo transmiiti- 
dos. Toda a operação é controla- 
da por um menu, cujos comandos, 
de fácil memorização, estão muito 
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nual, não-eletrônica (batedor de 
cabeçote), em que as relações 
ponto-traço-espaço não são obe- 
decidas. Em resumo, interessa mui- 
to mais a cadência do que a inten- 
sidade do sinal, Quando o QSO é 
entre duas “máquinas”, aí então 
é que se pode avaliar toda a po- 
tencialidade dessa interface. 


Estão de parabéns o Renato e 
o Sinésio, pela ousadia de desbra- 
var o mercado e pela qualidade de 
seu produto. Agradecemos a cola- 
horação de PY2AQO-Luiz, PY2 
DRD-Rodrigues e PY2EGY-Belso, 
cujos comentários foram de gran- 
de valia. 





RODADA MS 








| PAINEL TRASEIRO DO TK85 


Conector ligado ao 8? filete 


(da direita para esquerda) 









9vDc SOM 





P2(ao transmissor) 


Placa de circuito impresso 


Da fonte do microcomputador 








Figura 3 


tor. Tenho já vários e vários QSO assim realizados, nas mais di- 
versas velocidades, sem nunca ter encontrado nenhum proble- 
ma. 

Para aqueles que, como eu, não se sentiram satisfeitos com 
a má qualidade do som obtido através da TV ou em um rádio 
de FM, o oscilador de áudio da figura 4 é a dica do som perfei- 
to: use-o para aprender CW, ou como monitor em aulas de CW 
no seu clube, por exemplo. 











Figura 4 — Exemplo de um simples oscilador para prática de telegrafia 
que pode ser utilizado em conjunto com o micro. 


A partir daqui, o único problema que surge ao se utilizar 
este programa é a falta dos sinais de pontuação normalmente 
utilizados nos QSO de radioamadores. Creio que o programa 
possa ser facilmente modificado para incluir tais sinais, mas 
permito-me deixar tal modificação a cargo de outro leitor da 
RODADA MS. Quem se habilita? 

Vá o mais rapidamente possível para as faixas e não esque- 
ça de dizer a todos que está operando via computador — se não 
o fizer, muitos colegas acostumados à sua “munheca dura”, 
ao ouvirem aquela QSD “redondinha”, vão pensar que existe 
um clandestino operando com o seu indicativo... 
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De PY1DWM 





trabalho publicado nesta edição, de PY2RNJ-Erwin, é 

uma interessante aplicação do programa Código Morse à 
Moda Sinclair (Ms nº 35), do Jorge A. C. Bettencourt Soares, 
para que o seu micro possa manipular um transmissor através de 
uma pequena interface, e constitui um exemplo de concretização 
de um dos mais caros objetivos da RODADA MS: a realimenta- 
ção, ou efeito multiplicador, ou seja, modificações e/ou adapta- 
ções de trabalhos já publicados, ampliando a sua gama de utiliza- 
ção e o nosso elenco de colaboradores. 

Corresj fência recebida: de PY31T-Pivatto, PY3ASD-Mu- 
rillo, PT7VCH-Aquino; BI do CWRJ, BI do CWRL, O Jornal do 
Radioamador, órgão da LABRE DS /RJ; de PY 5SCIG-Alcione, colo- 
cando à disposição dos leitores os programas Arquivo de Comu- 
nicados e DXCC Cibernético compilados (em ve or /CMD, 
através do ZBASKC, e de execução muito mais rápida; de PYSADV/ 
1.Armando, reportando a construção e a medição em bancada de 
bobinas de antena calculadas pelo Antena Dipolo Encurtada 
(MS nº Bo) de PY2AQO, com resultados surpreendentemente 
exatos — 33,4 microH medidos contra 36.0 calculados! Ganhei 
de presente do Luiz uma antena dipolo encurtada para 80m, 
prontinha — foi só ligá-la junto com meu dipolo normal de 40m, 
formando um “bigode-de-gato” e sair ganhando as mais FB re- 
portagens. Reporta ainda o Armando ter convertido o programa 
do Luiz para micros da linha APPLE, estando à disposição dos 
interessados. Os sinceros agradecimentos da RODADA MS e os 
parabéns ao Luiz e ao Armando. 

Vejam (finalmente!) nesta seção as observações acerca da in- 
terface para transmissão/recepção de CW R$ 1050/A, da RENSI 
ELETRÔNICA DIGITAL, gentilmente cedida ag PY2EMI-Re- 
nato e PY2AIM-Sinésio, para apreciação e sorteio entre os nossos 
leitores; aguardem sensacional promoção para o sorteio. Em QSO 
recente, o Sinésio pediu-me para tis divulgasse o próximo lan- 
gamento da interface de R RSTY-1000, para micros das li- 
nhas TRS-80, TR$-80 Color, COMMODORE e APPLE, além dos 
programas de CW e RTTY distribuídos com as respectivas inter- 
faces para a linha Sinclair e já gravados em cartuchos — é só en- 
caixar o cartucho e o programa entra em execução! Parabéns ao 
Renato e ao Sinésio, e os votos de que continuem a nos brindar 
com essas maravilhas eletrônicas. 

Antes de encerrar, desejo registrar o transcurso, a 5 de maio, 
data de nascimento do Marechal Candido Mariano da Silva Ron- 
don, do Dia Mundial das Telecomunicações. Até a próxima, tudo 
de bom, e não deixem de prestigiar o nosso espaço. HPE CUAGN 
73 ES GL FM PYIDWM. 








A RODADA MS é coordenada por PYIDWM — Roberto Quito de 
Sant'Anna. Qualquer correspondência e/ou colaboração deve ser 
enviada aos seus cuidados, para a Av. Presidente Wilson, 165, grupo 
1210, CEP 20030, Rio de Janeiro, RJ. Contatos diretos via Rodada 
do Micro (7097 KHz, das 16:00 às 18:00h). Patrulha da Madruga- 
da (7055 KHz, das 22:00 às 23:00h) ou pelo telefone (0243) 
54-3355, ramal 594. 


Lista de materiais: 


CI1 — Circuito integrado 555. 
CI — Capacitor eletrolítico 220 UF/16V. 
C2 — Capacitor 0,1 UF, cerâmica 


Ri - Resistor IM Ohm 1/4 Watt. 

R2 — Resistor 5,6 K Ohm 1/4 Watt. 

R3 — Resistor 10 K Ohm 1/4 Watt, 

J1 — Jaque mono comum conforme plugue P2 do circuito 
oveniente do micro. 
TE — Alto-falante comum ou fone de 8 Ohms. 

Bateria — quatro pilhas pequenas em série. 





= 
e 





Erwin Hiúbsch Neto tem 19 anos e é radioamador desde 1980. Estuda 
em curso profissionalizante para Técnico em Eletrônica e possui um 
TK-85, procurando utilizá-lo junto à sua estação de radioamador, para 
os mais variados serviços. 
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Microcomputadores 

IBM PC, APPLE, TRS-80 
Nacionais compatíveis 
Drives, Impressoras 
Consulte-nos sobre 
Contratos de manutenção 







Av. Alm. Barroso, 91 - gr. 1.111 
Tel.: (021) 262-1886 


Na ADDRESS voce devora 
qualquer tipo de é 
O) 
Exclusivo metodo de ensino 
VIDEOTEACH que se utilizo da 
mais moderna técnica VISUAL 
o video-cassete. 
Edição microcomputarizada. 
Curso de BASIC TOTAL, e de 
APLICATIVOS apple 6. 
TURMAS ESPECIAIS 
PARA EMPRESAS 


FAÇA SUA RESERVA JÁ PELOS 


TELEFONES: 
OL4 2141-5348 e 011 212-0370 
ADDRESS 
Video 
Computer 
ma Connection , 


CUR 


HARDWARE .. SOFTWARE ,« 


CORRESPONDÊNCIA ou PESSOALMENTE C/AULAS PRÁTICAS FITAS CASSETES 






SOS. ALBAMAR 


ELETRÔNICA LTDA. 












* ELETRÔNICA DIGITAL | e ll 
—s Prática em KITs + apostila encadernada: 
* MICROPROCESSADORES 


z80 8080 - 8088 
—» Prática nos KITs ZHardware e Banana 85 + 
apostila encadernada. 
* MANUTENÇÃO DE 
MICROCOMPUTADORES. 
TR$8D - CPS0O 


DGTIOO- NAJA - SYSDATA 


—» Prática de manutenção com sofisticados 
equipamentos + apostila encádermada + 
esquema de todos os 


computadores. 
há DE PERIFÉRICOS 
DRIVES - IMPRESSORAS - MONITORES. 
INTERFACES 
—s Prática de manutenção com sofisticados 
aparelhos + apostila encadermada + 
esquemas dos Periféricos. 


ATENÇÃO: INSCRIÇÕES ABERTAS 
HARDNARE CURSOS INDUSTRIA DE INTERFACES - ASS. TÉCNICA 270-A São Cristóvão — Ro). 
- COMPONENTES ELETRÔNICOS 

R. SAMPAIO VIANA, 232 - Rio Comprido - CALL (021) 234-7873 - RJ 


COMPUTADORES 
E PERIFÉRICOS 


UNITRON 
MICROCRAFT 


VENDAS 
LEASING 


PROGRAMAS 
CURSOS 
ASSISTÊNCIA 
TÉCNICA 


Av. Mal. Câmara, 271 s/loja 101 
Tel: (021) 262-3289 — R.). 


* INTRODUÇÃO à COMPUTAÇÃO TAMAN HOS 
—+> Prática de manuseio & verificação das partes do om os To os EM 070) 
computador e suas unidades + apostila 
C30 e outros 


encadernada 
* BASIC BÁSICO + AVANÇADO eFITAS 
ag ao enem: MAGNÉTICAS 
1200 e 2400 pés 
e VHS — BETAMAX 
De T5 a T120 


O DISKETTES 
51i/4e8" + 


































* COBOL PARA MICROCOMPUTADORES 
Prática de programação nos computadores da 
“Hardware” + apostila encadeada, 


* ASSEMBLER ZILOG é INTEL 
(280 e 8085) 





—>Prática-de programação nos computadores 
ZHardware - Banana 85 - CP500 - TK83 - DGTI00 











Rua Conde de Leopoldina, 








Teis.: (021) 580-6729 
580-8276 





[&)] SUCOMP 
MODEMS TSL 


e Cirandão-1275 
e Analógicos — Banda Base 
— Sincronos — Assincronos 


MICROCOMPUTADORES 

PROFISSIONAIS EBC 

E PERIFÉRICOS 

* Onde sua configuração mini- 
ma é igual a máxima dos 
computadores pessoais 


e Controle de Restaurante 7 SUPRIMENTOS 
* Controle de Produtos Vendas Bag 4 e Disketes B' e 5 1/4 
* Folha/Contabilidade Controle > e Fitas Impressoras 
de Estoque Integrado e Discos e Fitas Magnéticas 


SUCOMP-COMÉRCIO E SERVICOS LTDA. 1 
Av. Marechal Floriano, 143-Gr. 701-CEP: 20080-RJ Tel.: (021) 263-8813 
ATENDEMOS POR REEMBOLSO POSTAL 


assinale as publicações que deseja receber 
PALMER — 20 jogos inteligentes em applesoft Cr$ 13,500, 
para toda linha apple inclusive TK-2000 
[ROCHA NETTO — Basic com Programação Estruturada: 
Para linha Sinclair — CP-200 — TK-85 Cr$ 14.000, 
CHIAPPETTA — Wordstar: Guia Compilado do Usuário. 
Para todos os micros que usam CP/M Cr$ 16.000, 
MENDES JR 30 Programas para TRS-80 Color computer e 
Similares Nacionais: CP-400, LZ Color 64 e 
Codimex 6809 Ci$ 15.900, 


























Nome 
Endereço CEP 

Cidade Estado 

Junte cheque nominal à Ciência Moderna Computação Ltda. 
Nº Banco 

no'valorde — — — eenvie seu cupom para: 


CIÊNCIA MODERNA COMPUTAÇÃO 

Av. Rio Branco, 156 Loja SS 127 (Subsolo) — CEP 20 043 
(Ed. Avenida Central) Tels. 262-5723 — 240-9327 — 
Caixa Postal 2848 20001 — Rio de Janeiro — RJ. 

















Linha SINCLAIR 











ly 


IQlUDIS) : 
a Es PRINT M;TAB 2,4727;S 
É | Cronômetro So irr ses 
35 PRINT AT 0,355 
o 40 IF 59 THEN GOTO 60 
(8) Digite este 45 FOR I=0 TO 5 

















nr pequeno programa e 50 NEXT 1 
ponha em seu micro 93 GOTO 30 
um cronômetro que eu : au ER à 
marca minutos e 5) TES MS So THEN RUN 
Envie suas dicas para a Redação de MICRO segundos. 75 PRINT AT O,0:M; TAB 3570 “ 
SISTEMAS na Av. Presidente Wilson, 165 el B0 FOR I=0 TO é 
— grupo 1210. Centro, Rio de Janeiro, RJ. Sérgio Kocinas - SP O O an 
CP. 20030 ' 





Linha SINCLAIR 


Destrave 
em high speed 


Linha TRS-80 


Entre direto no BASIC disco 
Ao chamar o BASIC, estando o computador no DOS, são feitas duas pergun- 
tas a respeito do número de arquivos e da memória usada. Para respondé-las, 
você normalmente tecla ENTER para cada uma delas e assim chega-se ao 





Use esta pequena dica para despro- 
teger programas gravados em High 
Speed. 

à FAST 
GOTO VAL USR 
NE LTNE 

Ao ser carregado, o programa apre- 
sentará erro C/0. 

Você ainda pode, em substituição 
ao GOTO, utilizar: PRINT-LPRINT- 
LIST-LLIST-GOSUB e PAUSE que o 


efeito será o mesmo. 





1630" 








David Jones Kulkys — SC 








Retorno automático 
de papel 


No momento em que o PC- 
1500 é ligado, há a inicializa- 
ção do Plotter /impressora com 
um consequente avanço de pa- 
pel de aproximadamente 2cm. 

Para retornar automatica- 
mente o papel, basta usar a 
seguinte linha de programa: 

1:ARUN : IF PEEK 
&729EF=BTHEN LF 
-S5: END 

A única restrição é que o 
micro deve ser desligado ante- 
riormente no modo RUN. 

Aldo Rodrigues da Costa — MG 














BASIC. Para evitar essa passagem, muitas vezes desnecessária, estando o compu- 
tador no DOS, digite BASIC, tecle a seta para a direita e <ENTER>. O computa- 
dor passará direto para o BASIC DISCO respondendo automaticamente àquelas 
perguntas. 





José Luiz Câmara — RJ 





Linha COLOR 


Pressione qualquer tecla 
Frequentemente é necessário interromper o processamento de um programa 
até que o usuário esteja pronto para continuar. Nesses casos é comum o uso de 
rotinas do tipo: 


5000 PRINTYAPERTE QUALQUER TECLA PARA CONTINUAR” 
5010 AG=INKEYG:IF AG="" THEN 5910 





Quando a quantidade de pausas é tal, que torna-se deselegante ou enfado- 
nho digitar diversas linhas iguais a essa, a solução é usar o seguinte artifício: 

Inclua no seu programa uma linha do tipo: | PI = 44539 (pode ser qualquer 

variável), 

toda vez que houver uma pausa, utilize a instrução EXEC Pl 





Cláudio Costa — RJ 








Linha TRS-8 


10 CLS 

Reta 20 INPUT/DE AS COORDENADAS (XL, Y1) 

Esta pequena dica per. CrXtsví o em satoog a dA 
mite que se trace uma reta 30 INPUTYDE AS COORDENADAS (X2,Y2) 
assa dois pontos Xe, va É ; . 
passando. por (dois pe 40 FOR I=Xí TO X2 STEP 0. 1:SETCI,F 





representados pelas coor- 
denadas (XI, Y1) e (X2, 
Y2). Para se usar X1 maior 
que X2, troque o STEP 


IXC(C((YB-YÍDHIAXIXVÍ KIKO) /(XI-XÍ) 
LR) 
50 NEXT 1 





Heriberto Fuertes e Antônio Ferreira — BA 


para -0.1. 











— 
>>> 


Linha 
SINCLAIR 


Mensagem senóide 


Com esta dica, seu nome rolará 
na tela obedecendo as regras da fun- 
ção seno: 









Modifique a linha 30 do progra- 
ma para: 





E possível criar várias outras 
equações semelhantes, bastando um 
pouco de imaginação e raciocínio. 


Linha TRS-80 





Painéis eletrônicos 


Estas duas pequenas dicas simu- 
lam um painel luminoso e rotativo. 
A primeira só funciona em Disk BA- 
SIC, mas pode ser adaptada para o 
BASIC residente retirando-se o co- 
mando DEFFN MS (1)=MIDS (AS, 
I, 2); e substituindo-se todos os 
FNMS$ (1) das linhas 20, 30 e 40 
para MIDS (AS$, 1, 2). A linha 60 
funciona como pausa e pode ser al- 
terada, A mensagem deve ter tama- 
nho par e, caso contrário, deve ser 
acrescentado um espaço no começo 
ou no final. 


10 CLS:DEFINTA-ZICLEARÍOOO:DEFFN 
MECI)=MIDSCAS, 1,2) 2A6="MENSAGEM” 
FASLENCAS) ELG=CHR$(14I)2P=960+(3 
2-A/2):REM MENSAGEM DEVE TER TAM 
ANHO PAR 

20 FORI=ITOASTEPIFALS=ALS+FNMSCI 
)J+LGENEXTEALS=LEFTS(ALS, A) 

30 AZS=LEFTE(AS, L)+LGIFORI=ITOAS 
TEP3: AZE+FNMSCI)+LGINEXT 

40 FORI=2TOASTEPI:AIG=AIG+LE+FNM 
$( 1): NEXT 

50 PRINTOP,AÍLS;:GOSUBSO:PRINTAP, 
2%; :GOSUB60:PRINTAP, AIG; :GOSUBA 
:G0TOSo 

60 FORI=1TO2S:NEXTERETURN 

70 REM LUZES ROTATIVAS 














A segunda dica simula um painel 
rotativo: 


10 DEFINTA-Z:A$="MENSAGEM" E A=SLEN 
(AG) :P=960+(32-A/2)2CLS 

20 FORI=0TOA-1L:PRINTOP,RIGHTECAS 
rA-I)FLEFTSCAS, 1)FaP, STRINGSCA,3 
2); *FORJ=1TO25:NEXTENEXTIGOTO2ZO 
30 REM ROTACÃO DE STRINGS 








Marcos Portnoi — BA 














Linha TRS-80 


Circunferências 
Trace uma circunferência no vídeo, onde R é o raio, o X do centro é dado por 


AeoY do centro por B. 
10 CLS 


20 INPUT“DE O RAIO”;RZINPUT/DE O X DO CENTRO“FAZINPUTDE O Y DO CENTRO“;B 


es cLs 


30 FOR I=0 TO 360:SET(FIXCA+RXCOSCI)),FIXC(B+(R/2)4SINCI)))ENEXT 1 





Heriberto Fuertes Ferreira — BA 


Linha COLOR 


PEEKs e POKEs 


Indique o endereço inicial de um programa BASIC: 
Ha DorPEEK (26) 

Indique o endereço final de um programa BASIC: 
EK (28) 

Indique o endereço de início das variáveis STRING: 





PEEK 





PEEICDT) AREoA 





PEEK (OD) xa +PE 
Indique o endereço final d 
PEEK CIÃ) 






Ke 





Ke: 


Este PEEK retorna um número menor que 128, se um programa BASIC 
parou devido a um comando END, ou retorna um número maior ou igual a 
128, se um programa BASIC parou devido a um comando STOP: 





PE 





K(ó) 








variáveis STRING: 





»+4 








Marcel T. da Fontoura — RJ 





Linha SINCLAIR 


Retire o caráter da tela 


Retire da tela o caráter cujo código 
se encontra no endereço 16514 com 
esta pequena rotina de 19 bytes em lin- 
guagem de máquina. 


16514 — 00 ZA OC 40 3A 82 40 01 
Dé 02 ED Bi CO 2B Jó 00 
es 18 F7 


Para testar digite: 


10 LET AS="AABBCCDDEEFFGGHHIIJJ 
KKLLMMNNOOPP” 

20 FOR N=0 TO 21 

30 PRINT AT N,07AS 

40 NEXT N 

50 INPUT CS 








a NEXT 
raio dado. Suor NES 


Linha TRS-80 


100 INPUTYENTRE R 

f 110 CLS:KX=642K 
Círculo na tela o xaasieasvoxas7? 
190 T=Ym7/5 

140 FOR HJ=0 TO 243. 

" P 150 Z1i=COS(HJ)RX+K 

Esta rotina cria um 160 IF Z1<O0 OR Z2> 


círculo, no vídeo, com um 17º SET(Z1,72) 





60 POKE 16514, CODE CS 
70 RAND USR 16515 
Bo GoTo so 


Dê RUN e digite qualquer caráter, 
presente ou não no vídeo, e observe o 
resultado. Não coloque o código de 
NEWLINE (118 em decimal ou $76 
em hexa) no endereço 16514 como 
dado da rotina, pois o arquivo de ima- 
gem ficará confuso e você fatalmente 
perderá o controle do teclado. 





Cláudia Eleone Gomes — RJ 













=64+RA 


52 IF XDT THEN T=X 

415 STEP 1/T 

SINCHID ATA Y 

OR Z2(0 OR Z2)47 THEN 180 

















Fernando Osvaldo Oliveira Jr. — SC 
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Software Industrial 


A LABO está completando seis anos de fundação lançando, em todo 
o país, a sua mais nova ferramenta de auxílio à produção: o PLANCO! 
— Planejamento e Controle Industrial. 

Quarenta por cento dos clientes da LABO são indústrias, e é dentro 
deste contexto que o PLANCO!I surge como auxiliar na composição dos 
custos e posterior planejamento da produção. O software é modular, ro- 
da nos minis 8038 e 8043, foi escrito em BASIC e é flexível a ponto de 


ser adaptável a cada caso. 


A PLANCOI visa indústrias de médio e grande porte, contando com 
módulos como Administração de Materiais; Planejamento e Controle de 
Produção e Custo Industrial. O endereço da LABO é: Av. Nações Uni- 
das, 13797 bloco Il 179 andar tel: (011) 533-1144 (SP). 


Folha de 
Pagamento 


A ESCOM, de Belo Horizonte 
(MG), está comercializando uma 
folha para micros com CP/M, 64 
Kb, duas unidades de disco flexi- 
vel e impressora. O programa foi 
escrito em COBOL 80, vem acom- 
panhado de manual e permite o 
controle de 250 funcionários na 
sua configuração mínima. 

A ESEC garante que o soft- 
ware foi adaptado às leis brasilei- 
ras, gerenciando mensalistas, se- 
manalistas ou autônomos. O ende- 
reço da empresa é Rua Espírito 
Santo 1204/307, tel. (031) 226- 
1023, MG. 


Ivanita II 


Depois do sucesso da placa 
Ivanita, que permite a acentuação 
nos micros da linha Apple, a em- 
presa Ivanita está lançando uma 
segunda versão da placa, na qual 
as letras maiúsculas já aparecem 
acentuadas no vídeo. A Ivanita Il 
também trabalha com CP/M 80 
colunas, BASIC e Pascal. A nova 
placa já está pronta porém está 
recebendo uma proteção especial 
contra cópias, e será colocada no 
mercado no final deste mês. A 
Ivanita Il poderá ser encontrada 
nas lojas especializadas e seu pre- 
ço será de 15 ORTN. Havendo 
necessidade de troca da Eprom da 
impressora, isso já está incluído 
no preço 





Cross 
no Apple 


A Data Shopping colocou no- 
vo software no mercado, desta vez 
direcionado à área de esportes, 
mais especificamente o motociclis- 
mo. O sistema processa dados 
(tempos, penalidades, largada, 
non-stop etc. dos enduros de re- 
gularidade, emitindo relatórios co- 
mo relação geral de pilotos; rela- 
tório de largada; classificação final 
e desempenho individual na pro- 
va. Seu preço fica em torno de 
90 ORTN, e para maiores infor- 
mações contactar a Data Shopping, 
que fica na rua Maciel Pinheiro, 
365 — 1º andar, Centro. Campina 
Grande, Pararba. Tel: (083) 321- 
9353. 


Read 
Datamicro 


A Datamicro planeja para o 
mês de agosto dois cursos especiais: 
Micro-Mulher e Sistemas de Ge- 
renciamento de Bancos de Dados. 
Micro-Mulher começa dia 06 
e custa Cr$ 185 mil cruzeiros, 
com carga horária de vinte horas 
e turmas de oito alunas. Sistemas 
de Gerenciamento requer conheci- 
mento de linguagem de alto nível, 
operação de um CP-500 e noções 
de CP/M. São 48 horas/aula divi- 
didas em dois módulos, com um 
preço total de Cr$ 590 mil. 

A Datamicro fica em Ipanema 
na Rua Visconde de Pirajá, 547/ 
211 — tel. (021) 511-0395 Rio de 
Janeiro (RJ). 


Sintetizador de Voz 


A Palm Informática, de Curiti- 
ba, empresa que há oito meses 
produz os cartuchos usados no vi- 
deogame Atari, está lançando uma 
placa sintetizadora de voz para 
micros compatíveis com Apple. O 
sintetizador possui duas opções 
para funcionamento, permitindo 
que as palavras sejam ditas em in- 
glês ou português, em ambos os 
casos com a pronúncia correta. 

Além disso, a placa possui um 


minidicionário de três mil pala- 
vras para traduções do português 
para o inglês. O sintetizador vem 
acompanhado de manual e soft- 
ware e custa Cr$ 330 mil. A co- 
mercialização é feita via reembol- 
so, e os pedidos devem ser enca- 
minhados para Palm Informática, 
rua Augusto Stellfeld, 1.314 — 
Curitiba — Paraná, CEP 80.000. 
Outras informações pelo tel.:(041) ma 
224-5946. Bs 





usuário. 


Permite também, adiantamentos de salário, 
reajuste salarial, alterações de acumulados e 
outras funções que agilizem o processamento 


da Folha de Pagamento da empresa. 


» 
bo, 
ÚU 












nesojon 


Im jeito fácil de resolver 


os problemas de seu computador. 


Faz a Folha de Pagamento de sua empresa, 
emitindo relatórios como Guia de IAPAS, 
Guia de FGTS, Relação de Empregados, 
Relação para 1.R., Relação para Banco, 
Informe de Rendimentos, Acumulados 
Anuais, RAIS e Recibo de Pagamento. 

A folha pode ser semanal ou mensal. 

As tabelas são modificadas pelo próprio 


Av. Rio Branco, 45 - sala 1.311 
Rio de Janeiro - CEP 20.090 
Tels.: (021) 263-1241 e 233-0615 












com até 5 níveis. 


outras funções. 


















A Contabilidade de um mês em 2 Horas! 
Este Sistema permite o cadastramento de 
históricos padronizados e de plano de contas 


Emite Diário, Razão, Balancete. Balanço, 

Demonstração de Resultados, Demonstração 
de Lucros e Prejuízos acumulados, Listagem 
por centro de custo e extrato de contas, entre 


Compatíveis com as linhas TR5-80 e Apple. 










etc 









outras. 






Controla o estoque de itens com 
Especificação, Estoque Minimo, Unidade, 
Fornecedor, Localização e outras 





informações relacionadas no item como 
Custo Médio, Entradas e Saídas no período, 


Fornece Listagens Geral e Parcial dos 
produtos, Listagem Físico-Financeira, 
Listagem dos produtos abaixo do estoque 
minimo, Lista de Preços e Etiquetas, entre 


Admite também, Reajuste de Preços, 
Alteração de Dados e Exclusão de Produtos. 





Estaremos presentes na Feira de Informática da SUCESU 
— de 23 a 29 de setembro em São Paulo, no Pavilhão 





Anexo do Anhembi. Visite-nos. 











CIPAOO 


VOCÊ TEM QUE ESTAR PREPARADO 
PARA SE DESENVOLVER COM OS 
NOVOS TEMPOS QUE ESTÃO AÍ. E O 
CP 400 COLOR É A CHAVE DESSA 
EVOLUÇÃO PESSOAL E PROFISSIONAL. 


cb DESSETIAA 








QUEM TEM 


POR QUÊ? 
PORQUE O 
CP 400 COLOR É 
UM COMPUTADOR 
PESSOAL DE 
TEMPO INTEGRAL: 
ÚTIL PARA A 
FAMÍLIA TODA, O DIA INTEIRO. 

NA HORA DE SE DIVERTIR, POR 
EXEMPLO, É MUITO MAIS EMOCIO- 
NANTE PORQUE, ALÉM DE OFERECER 
JOGOS INÉDITOS, É O ÚNICO COM 
2 JOYSTICKS ANALÓGICOS DE ALTA 
SENSIBILIDADE, QUE PERMITEM MO- 
VIMENTAR AS IMAGENS EM TODAS 
AS DIREÇÕES, MESMO. NA HORA 
DE TRABALHAR E ESTUDAR, O CP 400 
COLOR MOSTRA O SEU LADO SÉRIO: 
MEMÓRIA EXPANSÍVEL, PORTA PARA 
COMUNICAÇÃO DE DADOS, SAÍDA 
PARA IMPRESSORA, E UMA ÓTIMA 
NITIDEZ COM IMAGENS COLORIDAS. 

COMO SE TUDO ISSO NÃO 
BASTASSE, A PROLÓGICA AINDA OFE- 
RECE A GARANTIA DE QUALIDADE 
DE QUEM É LÍDER NA TECNOLOGIA 
DE COMPUTADORES, E O PREÇO 
MAIS ACESSÍVEL NA CATEGORIA. 

NUMA FRASE: SE VOCÊ NÃO 
QUISER CHEGAR ATRASADO AO FU- 
TURO, COMPRE SEU CP 400 COLOR 
IMEDIATAMENTE. 

EMOÇÃO E INTELIGÊNCIA NUM 
EQUIPAMENTO SÓ. 

e MICROPROCESSADOR: 6809E COM 





UM, TE 


ESTRUTURA INTERNA DE — 
16 BITS E CLOCK DE FREQUÊNCIA 
DE ATÉ 1.6 MHZ. ) 

* POSSIBILITA Q USO DE ATÉ 
9 CORES, E TEM UMA RESOLUÇÃO 
GRÁFICA SUPERIOR A 49.000 
PONTOS. 

* MEMÓRIA ROM: 16K BYTES 
PARA SISTEMA OPERACIONAL E 
INTERPRETADOR BASIC. 

* MEMÓRIA RAM: O CP 400 COLOR 
ESTÁ DISPONÍVEL EM DOIS MODELOS: 

* MODELO 16K: 
EXPANSÍVEL A 
64K BYTES. 

* MODELO G4k: 
ATÉ 64K BYTES 
QUANDO USADO 
COM O NOVO 
DISK-SYSTEM, 
CP 450. 

* O CP 400 COLOR DISPÕE DE 
CARTUCHOS DE PROGRAMAS COM 
16 BYTES DE CAPACIDADE, 

QUE PERMITEM O CARREGAMENTO 
INSTANTÂNEO DE JOGOS, 
LINGUAGENS E APLICATIVOS COMO: 
BANCO DE DADOS, PLANILHAS 

DE CÁLCULO, EDITORES DE TEXTOS 
APLICATIVOS FINANCEIROS, 
APLICATIVOS GRÁFICOS, ETC. 

* SAÍDA SERIAL RS 232 C QUE 
PERMITE COMUNICAÇÃO DE DADOS 
ALÉM DO QUE, ATRAVÉS DESTA 
PORTA, VOCÊ PODE CONECTAR 





M FUTURO. 


QUALQUER IMPRESSORA SERIAL 
OU ATÉ MESMO 

FORMAR UMA 
REDE DE TRABA- 
LHO COM 
OUTROS MICROS. 

* PORTA PARA 
GRAVADOR CAS- Hm 
SETE COM GRAVAÇÃO E LEITURA 
DE ALTA VELOCIDADE. 

* SAÍDAS PARA TV EM CORES E MONI- 
TOR PROFISSIONAL. 

* DUAS ENTRADAS PARA JOYSTICKS 
ANALÓGICOS QUE OFERECEM 
INFINITAS POSIÇÕES NA TELA, 
ENQUANTO OUTROS TÊM SOMENTE 
8 DIREÇÕES. 

* AMPLA BIBLIOTECA DE SOFTWARE 
JÁ DISPONÍVEL. 

* ALIMENTAÇÃO: 110-220 VOLTS. 


VEJA, TESTE E COMPRE 
SEU CP 400 COLOR NOS MAGAZINES 
E REVENDEDORES PROLÓGICA. 


TECNOLOGIA SER 
PROLOGICA 













COMPUTADORES PESSOAIS 


RUA PTOLOMEU, 650 - VILA SOCORRO 
SÃO PAULO, SP. - CEP 04762 
FONES: (PBX)523-9939/548-0749/548-4540 





AMicrodigital 
lança no Brasi 
omicro pessoal 
de maior sucesso 
nomundo. 


À partir de agora a história dos 
micros pessoais vai ser contada em duas 
partes: antes e depois do TK 90X. 

O TK 90X é, simplesmente, o único 
micro pessoal lançado no Brasil que 
merece a classificação de “software 
machine”: um caso raro de micro que 
pela sua facilidade de uso, grandes 
recursos e preço acessível recebeu a 


cheio 


Filiada à ABICOMP 


TIK DO 


color computer 





Lheg 


atenção dos criadores de programas e 
periféricos em todo o mundo. 

Para você ter uma idéia, existem 
mais de 2 mil programas, 70 livros, 30 
periféricos e inúmeras 
revistas de usuários disponíveis 
para ele internacionalmente. 






E aqui o TK 90X já sai com mais de 
100 programas, enquanto outros estão 
em fase final de desenvolvimento para 
lhe dar mais opções para trabalhar, 
prender ou se divertir que com qualquer 
tro micro. 

O TK 90X tem duas versões de 
memória (de 16 ou 48 K), imagem de 
alta resolução gráfica com 8 cores, 
carregamento rápido de programas 
(controlável pelo próprio monitor), som 
pela TV, letras maiúsculas e minúsculas 
e ainda uma exclusividade: acentuação 
em português. 

Faça 0 seu programa: peca já uma 
demonstração do novo TK 90X. 


[o E =+) 





ou 0 micro 
e programas. 


Da 


